home *** CD-ROM | disk | FTP | other *** search
| Unknown | 1995-04-11 | 73.6 KB |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was not able to be converted.
This format is not currently supported by dexvert.
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 100%
| file
| data
| default
| |
| 100%
| xdgMime
| image/x-tga
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 10 f4 20 3e 21 | 52 75 6e 69 6d 61 67 65 |..... >!|Runimage|
|00000010| 0d 00 14 10 73 74 61 72 | 74 75 70 6f 6b 25 3d 30 |....star|tupok%=0|
|00000020| 0d 00 1e 14 ee 85 20 f6 | 3a f1 22 20 61 74 20 22 |...... .|:." at "|
|00000030| 3b 9e 3a e0 0d 00 28 3c | c8 99 22 57 69 6d 70 5f |;.:...(<|.."Wimp_|
|00000040| 53 6c 6f 74 53 69 7a 65 | 22 2c 2d 31 2c 2d 31 b8 |SlotSize|",-1,-1.|
|00000050| 2c 2c 66 25 3a e7 66 25 | 3e 28 39 36 2a 31 30 32 |,,f%:.f%|>(96*102|
|00000060| 34 29 8c 66 25 2d 3d 28 | 36 34 2a 31 30 32 34 29 |4).f%-=(|64*1024)|
|00000070| 0d 00 32 15 e0 3d 93 2b | a4 66 72 65 65 6d 65 6d |..2..=.+|.freemem|
|00000080| 28 2d 36 34 29 0d 00 3c | 20 e7 28 93 2d e0 29 3e |(-64)..<| .(.-.)>|
|00000090| 33 32 30 2a 31 30 32 34 | 8c e0 3d e0 2b 33 32 30 |320*1024|..=.+320|
|000000a0| 2a 31 30 32 34 0d 00 46 | 09 f2 69 6e 69 74 0d 00 |*1024..F|..init..|
|000000b0| 50 0d f2 6c 6f 61 64 63 | 6f 64 65 0d 00 5a 12 f2 |P..loadc|ode..Z..|
|000000c0| 73 74 61 72 74 6d 73 67 | 74 72 61 6e 73 0d 00 64 |startmsg|trans..d|
|000000d0| 0b f2 67 65 74 65 6e 76 | 0d 00 6e 0d f2 69 6e 69 |..getenv|..n..ini|
|000000e0| 74 77 69 6d 70 0d 00 78 | 11 ee 85 f2 65 72 72 6f |twimp..x|....erro|
|000000f0| 72 62 6f 78 3a e0 0d 00 | 82 0f f2 6c 6f 61 64 63 |rbox:...|...loadc|
|00000100| 6f 6e 66 69 67 0d 00 8c | 1d e0 3d e0 2b 26 34 30 |onfig...|..=.+&40|
|00000110| 30 30 2b 28 74 78 74 78 | 25 81 32 2a 74 78 74 79 |00+(txtx|%.2*txty|
|00000120| 25 29 0d 00 96 0d f2 69 | 6e 69 74 5f 74 78 74 0d |%).....i|nit_txt.|
|00000130| 00 a0 18 53 25 3d a4 66 | 69 6c 65 5f 73 69 7a 65 |...S%=.f|ile_size|
|00000140| 28 66 69 6c 65 24 29 0d | 00 aa 2b e7 53 25 3d 30 |(file$).|..+.S%=0|
|00000150| 8c 53 25 3d 31 30 32 34 | 3a f2 73 79 73 6d 73 67 |.S%=1024|:.sysmsg|
|00000160| 28 a4 6d 73 67 30 28 22 | 53 6e 6f 6e 65 22 29 2c |(.msg0("|Snone"),|
|00000170| 30 29 0d 00 b4 0f e0 3d | 28 e0 2b 26 34 30 30 30 |0).....=|(.+&4000|
|00000180| 29 0d 00 be 10 73 74 61 | 72 74 75 70 6f 6b 25 3d |)....sta|rtupok%=|
|00000190| b9 0d 00 c8 16 f2 69 6e | 69 74 73 63 72 69 70 74 |......in|itscript|
|000001a0| 28 66 69 6c 65 24 29 0d | 00 d2 12 e0 3d 93 2b a4 |(file$).|....=.+.|
|000001b0| 63 68 65 63 6b 73 6c 6f | 74 0d 00 dc 14 41 25 3d |checkslo|t....A%=|
|000001c0| a4 6d 6f 64 65 6d 64 72 | 76 28 22 22 29 0d 00 e6 |.modemdr|v("")...|
|000001d0| 05 f5 0d 00 f0 0e 20 20 | 73 74 61 67 65 25 3d 30 |...... |stage%=0|
|000001e0| 0d 00 fa 24 20 20 f2 70 | 72 69 6e 74 28 a4 6d 73 |...$ .p|rint(.ms|
|000001f0| 67 30 28 22 53 74 61 72 | 74 53 22 29 2c 22 20 22 |g0("Star|tS")," "|
|00000200| 2c 22 22 29 0d 01 04 07 | 20 20 f5 0d 01 0e 16 20 |,"")....| ..... |
|00000210| 20 20 20 e0 3d 93 2b a4 | 63 68 65 63 6b 73 6c 6f | .=.+.|checkslo|
|00000220| 74 0d 01 18 3d 20 20 20 | 20 e7 a4 74 65 73 74 65 |t...= | ..teste|
|00000230| 76 65 6e 74 20 8c 41 24 | 3d a4 67 65 74 65 76 65 |vent .A$|=.geteve|
|00000240| 6e 74 20 8b 41 24 3d a4 | 6c 69 6e 65 28 73 74 61 |nt .A$=.|line(sta|
|00000250| 67 65 25 29 3a 73 74 61 | 67 65 25 2b 3d 31 0d 01 |ge%):sta|ge%+=1..|
|00000260| 22 1c 20 20 20 20 72 65 | 74 75 72 6e 25 3d a4 63 |". re|turn%=.c|
|00000270| 6f 6d 6d 61 6e 64 28 41 | 24 29 0d 01 2c 1d 20 20 |ommand(A|$)..,. |
|00000280| fd 73 74 61 67 65 25 3e | 3d 63 6f 75 6e 74 25 20 |.stage%>|=count% |
|00000290| 84 72 75 6e 25 3d a3 0d | 01 36 2a 20 20 72 75 6e |.run%=..|.6* run|
|000002a0| 25 3d a3 3a f2 70 72 69 | 6e 74 28 22 20 22 2c a4 |%=.:.pri|nt(" ",.|
|000002b0| 6d 73 67 30 28 22 49 64 | 6c 65 22 29 2c 22 20 22 |msg0("Id|le")," "|
|000002c0| 29 0d 01 40 0d 20 20 f2 | 70 61 75 73 65 64 0d 01 |)..@. .|paused..|
|000002d0| 4a 06 fd 30 0d 01 54 05 | e0 0d 01 5e 04 0d 01 68 |J..0..T.|...^...h|
|000002e0| 20 f4 20 73 65 74 20 75 | 70 20 75 6e 69 76 65 72 | . set u|p univer|
|000002f0| 73 61 6c 20 76 61 72 69 | 61 62 6c 65 73 0d 01 72 |sal vari|ables..r|
|00000300| 0a dd f2 69 6e 69 74 0d | 01 7c 0e de 20 74 6d 70 |...init.|.|.. tmp|
|00000310| 25 20 32 35 36 0d 01 86 | 15 62 64 72 69 76 65 72 |% 256...|.bdriver|
|00000320| 73 69 7a 65 25 3d 34 30 | 39 36 0d 01 90 1b de 20 |size%=40|96..... |
|00000330| 62 64 72 69 76 65 72 25 | 20 62 64 72 69 76 65 72 |bdriver%| bdriver|
|00000340| 73 69 7a 65 25 0d 01 9a | 22 c8 99 22 4f 53 5f 42 |size%...|".."OS_B|
|00000350| 79 74 65 22 2c 31 32 39 | 2c 30 2c 26 46 46 20 b8 |yte",129|,0,&FF .|
|00000360| 2c 6f 73 76 65 72 25 0d | 01 a4 10 73 70 72 73 7a |,osver%.|...sprsz|
|00000370| 25 3d 26 32 30 30 30 0d | 01 ae 18 72 65 64 69 61 |%=&2000.|...redia|
|00000380| 6c 25 3d a3 3a 6c 69 74 | 65 72 61 6c 25 3d 30 0d |l%=.:lit|eral%=0.|
|00000390| 01 b8 18 64 61 74 61 24 | 3d 22 22 3a 64 69 61 6c |...data$|="":dial|
|000003a0| 6c 69 6e 67 25 3d a3 0d | 01 c2 47 66 69 6c 65 6e |ling%=..|..Gfilen|
|000003b0| 6f 25 3d 31 3a 74 6f 74 | 61 6c 25 3d 30 3a 70 61 |o%=1:tot|al%=0:pa|
|000003c0| 75 73 65 25 3d a3 3a 73 | 74 6f 70 25 3d a3 3a 72 |use%=.:s|top%=.:r|
|000003d0| 75 6e 25 3d a3 3a 74 61 | 73 6b 73 74 61 72 74 25 |un%=.:ta|skstart%|
|000003e0| 3d 30 3a 68 69 67 68 65 | 73 74 25 3d 2d 31 0d 01 |=0:highe|st%=-1..|
|000003f0| cc 4a 64 65 76 69 63 65 | 25 3d a3 3a 6f 6c 64 6c |.Jdevice|%=.:oldl|
|00000400| 69 6e 65 25 3d 30 3a 64 | 65 62 75 67 25 3d a3 3a |ine%=0:d|ebug%=.:|
|00000410| 65 72 72 43 25 3d 30 3a | 66 68 31 25 3d 30 3a 66 |errC%=0:|fh1%=0:f|
|00000420| 68 32 25 3d 30 3a 6f 6e | 6c 69 6e 65 24 3d 22 30 |h2%=0:on|line$="0|
|00000430| 30 3a 30 30 3a 30 30 22 | 0d 01 d6 0c 73 74 61 67 |0:00:00"|....stag|
|00000440| 65 25 3d 30 0d 01 e0 36 | 73 75 62 6d 61 78 25 3d |e%=0...6|submax%=|
|00000450| 32 30 3a de 63 61 6c 6c | 5f 72 65 74 25 28 73 75 |20:.call|_ret%(su|
|00000460| 62 6d 61 78 25 29 2c 63 | 61 6c 6c 5f 6c 6f 63 6b |bmax%),c|all_lock|
|00000470| 25 28 73 75 62 6d 61 78 | 25 29 0d 01 ea 44 63 61 |%(submax|%)...Dca|
|00000480| 73 6d 61 78 25 3d 31 30 | 3a de 63 61 73 65 24 28 |smax%=10|:.case$(|
|00000490| 63 61 73 6d 61 78 25 29 | 2c 63 61 73 6d 61 74 63 |casmax%)|,casmatc|
|000004a0| 68 25 20 63 61 73 6d 61 | 78 25 2c 61 6c 69 6e 65 |h% casma|x%,aline|
|000004b0| 24 28 33 29 2c 61 6c 69 | 6e 65 25 28 33 29 0d 01 |$(3),ali|ne%(3)..|
|000004c0| f4 3c 6d 65 6e 75 6d 61 | 78 25 3d 33 30 3a de 75 |.<menuma|x%=30:.u|
|000004d0| 6d 65 6e 75 24 28 6d 65 | 6e 75 6d 61 78 25 2c 31 |menu$(me|numax%,1|
|000004e0| 29 2c 75 73 65 72 6d 65 | 6e 75 24 28 31 29 2c 6c |),userme|nu$(1),l|
|000004f0| 6f 67 6d 65 6e 75 24 28 | 31 29 0d 01 fe 38 6a 74 |ogmenu$(|1)...8jt|
|00000500| 6d 61 78 25 3d 35 30 3a | de 6a 74 25 28 6a 74 6d |max%=50:|.jt%(jtm|
|00000510| 61 78 25 29 2c 6a 74 24 | 28 6a 74 6d 61 78 25 29 |ax%),jt$|(jtmax%)|
|00000520| 3a 6a 74 6c 25 3d 30 3a | 72 65 74 75 72 6e 24 3d |:jtl%=0:|return$=|
|00000530| 22 22 0d 02 08 40 76 6d | 61 78 25 3d 31 35 30 3a |""...@vm|ax%=150:|
|00000540| de 76 61 72 24 28 76 6d | 61 78 25 2c 31 29 2c 73 |.var$(vm|ax%,1),s|
|00000550| 34 24 28 33 29 2c 74 67 | 65 74 24 28 33 29 2c 69 |4$(3),tg|et$(3),i|
|00000560| 68 69 73 74 24 28 31 30 | 29 3a 69 68 69 73 74 25 |hist$(10|):ihist%|
|00000570| 3d 30 0d 02 12 43 61 6c | 6d 61 78 25 3d 31 30 3a |=0...Cal|max%=10:|
|00000580| de 61 6c 61 72 6d 24 28 | 61 6c 6d 61 78 25 2c 31 |.alarm$(|almax%,1|
|00000590| 29 2c 61 6c 61 72 6d 74 | 69 6d 65 25 28 61 6c 6d |),alarmt|ime%(alm|
|000005a0| 61 78 25 29 2c 61 6c 61 | 72 6d 69 64 24 28 61 6c |ax%),ala|rmid$(al|
|000005b0| 6d 61 78 25 29 0d 02 1c | 37 69 6d 61 78 25 3d 38 |max%)...|7imax%=8|
|000005c0| 3a de 69 66 69 6c 65 24 | 28 69 6d 61 78 25 29 2c |:.ifile$|(imax%),|
|000005d0| 69 62 61 72 24 28 69 6d | 61 78 25 29 2c 69 6d 65 |ibar$(im|ax%),ime|
|000005e0| 6e 75 24 28 69 6d 61 78 | 25 2c 31 29 0d 02 26 20 |nu$(imax|%,1)..& |
|000005f0| de 69 62 61 72 69 64 24 | 28 69 6d 61 78 25 29 2c |.ibarid$|(imax%),|
|00000600| 69 62 61 72 25 28 69 6d | 61 78 25 29 0d 02 30 43 |ibar%(im|ax%)..0C|
|00000610| 74 61 73 6b 6d 61 78 25 | 3d 38 3a de 74 61 73 6b |taskmax%|=8:.task|
|00000620| 65 78 24 28 74 61 73 6b | 6d 61 78 25 29 2c 74 61 |ex$(task|max%),ta|
|00000630| 73 6b 6e 24 28 74 61 73 | 6b 6d 61 78 25 29 2c 74 |skn$(tas|kmax%),t|
|00000640| 61 73 6b 68 25 28 74 61 | 73 6b 6d 61 78 25 29 0d |askh%(ta|skmax%).|
|00000650| 02 3a 3c 74 77 6d 61 78 | 25 3d 38 3a de 74 77 65 |.:<twmax|%=8:.twe|
|00000660| 78 69 74 24 28 74 77 6d | 61 78 25 29 2c 74 77 6e |xit$(twm|ax%),twn|
|00000670| 61 6d 65 24 28 74 77 6d | 61 78 25 29 2c 74 77 63 |ame$(twm|ax%),twc|
|00000680| 6f 6d 24 28 74 77 6d 61 | 78 25 29 0d 02 44 3a de |om$(twma|x%)..D:.|
|00000690| 74 77 68 25 28 74 77 6d | 61 78 25 29 2c 74 77 66 |twh%(twm|ax%),twf|
|000006a0| 25 28 74 77 6d 61 78 25 | 29 2c 74 64 61 74 61 24 |%(twmax%|),tdata$|
|000006b0| 28 74 77 6d 61 78 25 29 | 2c 74 77 77 25 28 74 77 |(twmax%)|,tww%(tw|
|000006c0| 6d 61 78 25 29 0d 02 4e | 38 de 74 77 79 25 28 74 |max%)..N|8.twy%(t|
|000006d0| 77 6d 61 78 25 29 2c 74 | 77 6f 25 28 74 77 6d 61 |wmax%),t|wo%(twma|
|000006e0| 78 25 29 2c 74 77 6b 25 | 28 74 77 6d 61 78 25 29 |x%),twk%|(twmax%)|
|000006f0| 2c 74 77 74 25 28 74 77 | 6d 61 78 25 29 0d 02 58 |,twt%(tw|max%)..X|
|00000700| 3b 74 67 65 74 25 3d 2d | 31 3a 74 77 77 25 28 29 |;tget%=-|1:tww%()|
|00000710| 3d 30 3a 74 77 6f 25 28 | 29 3d 30 3a 74 77 77 6d |=0:two%(|)=0:twwm|
|00000720| 61 78 25 3d 32 39 3a 74 | 78 74 78 25 3d 38 30 3a |ax%=29:t|xtx%=80:|
|00000730| 74 78 74 79 25 3d 32 34 | 0d 02 62 47 6d 61 78 65 |txty%=24|..bGmaxe|
|00000740| 76 25 3d 31 30 3a de 65 | 76 65 6e 74 24 28 6d 61 |v%=10:.e|vent$(ma|
|00000750| 78 65 76 25 29 2c 65 76 | 65 6e 74 25 28 6d 61 78 |xev%),ev|ent%(max|
|00000760| 65 76 25 29 2c 65 76 74 | 79 70 65 25 28 6d 61 78 |ev%),evt|ype%(max|
|00000770| 65 76 25 29 3a 65 76 65 | 6e 74 25 28 29 3d b9 0d |ev%):eve|nt%()=..|
|00000780| 02 6c 47 66 6d 61 78 25 | 3d 31 30 3a de 66 69 6c |.lGfmax%|=10:.fil|
|00000790| 65 68 25 28 66 6d 61 78 | 25 29 2c 66 69 6c 65 69 |eh%(fmax|%),filei|
|000007a0| 64 24 28 66 6d 61 78 25 | 29 2c 66 69 6c 65 77 72 |d$(fmax%|),filewr|
|000007b0| 25 28 66 6d 61 78 25 29 | 2c 66 69 6c 65 6e 24 28 |%(fmax%)|,filen$(|
|000007c0| 66 6d 61 78 25 29 0d 02 | 76 48 6d 73 67 6d 61 78 |fmax%)..|vHmsgmax|
|000007d0| 25 3d 35 30 3a 6d 73 67 | 5f 63 73 24 3d 22 22 3a |%=50:msg|_cs$="":|
|000007e0| 6d 73 67 5f 63 65 24 3d | 22 22 3a 6d 73 67 5f 63 |msg_ce$=|"":msg_c|
|000007f0| 6d 25 3d 30 3a 6d 73 67 | 5f 63 73 25 3d 30 3a 6d |m%=0:msg|_cs%=0:m|
|00000800| 73 67 63 25 3d b9 3a 6d | 73 67 74 25 3d 30 0d 02 |sgc%=.:m|sgt%=0..|
|00000810| 80 0e 6d 73 67 77 61 69 | 74 25 3d 30 0d 02 8a 22 |..msgwai|t%=0..."|
|00000820| 73 64 64 69 72 24 3d a4 | 76 61 72 76 61 6c 28 22 |sddir$=.|varval("|
|00000830| 53 6c 69 70 64 69 61 6c | 24 64 69 72 22 29 0d 02 |Slipdial|$dir")..|
|00000840| 94 28 73 64 72 65 73 24 | 3d a4 76 61 72 76 61 6c |.(sdres$|=.varval|
|00000850| 28 22 53 6c 69 70 64 69 | 61 6c 24 72 65 73 6f 75 |("Slipdi|al$resou|
|00000860| 72 63 65 73 22 29 0d 02 | 9e 39 73 64 6c 61 6e 67 |rces")..|.9sdlang|
|00000870| 24 3d 73 64 72 65 73 24 | 2b 22 2e 55 4b 22 3a 63 |$=sdres$|+".UK":c|
|00000880| 68 24 3d 22 22 3a 61 75 | 74 6f 77 69 6e 70 6f 73 |h$="":au|towinpos|
|00000890| 25 3d 31 3a 6e 75 6d 24 | 3d 22 6e 6f 6e 65 22 0d |%=1:num$|="none".|
|000008a0| 02 a8 05 e1 0d 02 b2 04 | 0d 02 bc 27 f4 20 73 65 |........|...'. se|
|000008b0| 74 20 75 70 20 77 69 6d | 70 20 61 6e 64 20 72 65 |t up wim|p and re|
|000008c0| 6c 61 74 65 64 20 76 61 | 72 69 61 62 6c 65 73 0d |lated va|riables.|
|000008d0| 02 c6 0e dd f2 69 6e 69 | 74 77 69 6d 70 0d 02 d0 |.....ini|twimp...|
|000008e0| 33 de 20 73 70 72 69 74 | 65 73 25 20 73 70 72 73 |3. sprit|es% sprs|
|000008f0| 7a 25 3a 21 73 70 72 69 | 74 65 73 25 3d 73 70 72 |z%:!spri|tes%=spr|
|00000900| 73 7a 25 3a 73 70 72 69 | 74 65 73 25 21 38 3d 30 |sz%:spri|tes%!8=0|
|00000910| 0d 02 da 22 c8 99 20 22 | 4f 53 5f 53 70 72 69 74 |...".. "|OS_Sprit|
|00000920| 65 4f 70 22 2c 26 31 30 | 39 2c 73 70 72 69 74 65 |eOp",&10|9,sprite|
|00000930| 73 25 0d 02 e4 42 e7 a4 | 6d 65 72 67 65 73 70 72 |s%...B..|mergespr|
|00000940| 69 74 65 73 28 73 64 72 | 65 73 24 2b 22 2e 53 70 |ites(sdr|es$+".Sp|
|00000950| 72 69 74 65 73 22 29 3d | 30 8c 85 30 2c 22 43 6f |rites")=|0..0,"Co|
|00000960| 75 6c 64 6e 27 74 20 6c | 6f 61 64 20 73 70 72 69 |uldn't l|oad spri|
|00000970| 74 65 73 22 0d 02 ee 2f | de 20 74 61 73 6b 69 64 |tes".../|. taskid|
|00000980| 25 34 3a 24 74 61 73 6b | 69 64 25 3d 22 54 41 53 |%4:$task|id%="TAS|
|00000990| 4b 22 3a 54 61 73 6b 24 | 3d 22 53 4c 49 50 64 69 |K":Task$|="SLIPdi|
|000009a0| 61 6c 22 0d 02 f8 1b de | 20 6d 73 67 6c 69 73 74 |al".....| msglist|
|000009b0| 25 34 3a 21 6d 73 67 6c | 69 73 74 25 3d 30 0d 03 |%4:!msgl|ist%=0..|
|000009c0| 02 45 c8 99 20 22 57 69 | 6d 70 5f 49 6e 69 74 69 |.E.. "Wi|mp_Initi|
|000009d0| 61 6c 69 73 65 22 2c 33 | 31 30 2c 21 74 61 73 6b |alise",3|10,!task|
|000009e0| 69 64 25 2c 54 61 73 6b | 24 2c 6d 73 67 6c 69 73 |id%,Task|$,msglis|
|000009f0| 74 25 20 b8 20 76 65 72 | 73 69 6f 6e 25 2c 74 61 |t% . ver|sion%,ta|
|00000a00| 73 6b 25 0d 03 0c 2e e7 | 76 65 72 73 69 6f 6e 25 |sk%.....|version%|
|00000a10| 3c 33 31 30 20 8c 85 31 | 2c 22 57 69 6e 64 6f 77 |<310 ..1|,"Window|
|00000a20| 20 4d 61 6e 61 67 65 72 | 20 74 6f 6f 20 6f 6c 64 | Manager| too old|
|00000a30| 22 0d 03 16 13 73 74 77 | 78 25 3d 30 3a 73 74 77 |"....stw|x%=0:stw|
|00000a40| 79 25 3d 30 0d 03 20 24 | 66 68 31 25 3d a4 6f 70 |y%=0.. $|fh1%=.op|
|00000a50| 65 6e 69 6e 28 73 64 72 | 65 73 24 2b 22 2e 21 77 |enin(sdr|es$+".!w|
|00000a60| 69 6e 64 6f 77 73 22 29 | 0d 03 2a 0c e7 66 68 31 |indows")|..*..fh1|
|00000a70| 25 3e 30 8c 0d 03 34 21 | 20 20 73 74 77 78 25 3d |%>0...4!| stwx%=|
|00000a80| bb be 23 66 68 31 25 3a | 73 74 77 79 25 3d bb be |..#fh1%:|stwy%=..|
|00000a90| 23 66 68 31 25 0d 03 3e | 05 cd 0d 03 48 0d f2 63 |#fh1%..>|....H..c|
|00000aa0| 66 28 66 68 31 25 29 0d | 03 52 35 de 20 71 25 20 |f(fh1%).|.R5. q% |
|00000ab0| 26 34 30 30 2c 6d 65 6e | 75 64 61 74 61 25 20 26 |&400,men|udata% &|
|00000ac0| 32 30 30 2c 69 63 6f 6e | 73 25 20 26 31 30 30 2c |200,icon|s% &100,|
|00000ad0| 62 75 66 66 65 72 25 20 | 26 31 30 30 0d 03 5c 30 |buffer% |&100..\0|
|00000ae0| c8 99 20 22 57 69 6d 70 | 5f 4f 70 65 6e 54 65 6d |.. "Wimp|_OpenTem|
|00000af0| 70 6c 61 74 65 22 2c 2c | 73 64 6c 61 6e 67 24 2b |plate",,|sdlang$+|
|00000b00| 22 2e 54 65 6d 70 6c 61 | 74 65 73 22 0d 03 66 1b |".Templa|tes"..f.|
|00000b10| 69 6e 66 6f 25 3d a4 6c | 6f 61 64 74 65 6d 70 28 |info%=.l|oadtemp(|
|00000b20| 22 49 6e 66 6f 22 29 0d | 03 70 1f 73 74 61 74 75 |"Info").|.p.statu|
|00000b30| 73 25 3d a4 6c 6f 61 64 | 74 65 6d 70 28 22 53 74 |s%=.load|temp("St|
|00000b40| 61 74 75 73 22 29 0d 03 | 7a 1c 74 78 74 25 3d a4 |atus")..|z.txt%=.|
|00000b50| 6c 6f 61 64 74 65 6d 70 | 28 22 74 78 74 77 69 6e |loadtemp|("txtwin|
|00000b60| 22 29 0d 03 84 1f 63 6f | 6e 66 69 67 25 3d a4 6c |")....co|nfig%=.l|
|00000b70| 6f 61 64 74 65 6d 70 28 | 22 63 6f 6e 66 69 67 22 |oadtemp(|"config"|
|00000b80| 29 0d 03 8e 1e 6d 65 73 | 73 25 3d a4 6c 6f 61 64 |)....mes|s%=.load|
|00000b90| 74 65 6d 70 28 22 6d 65 | 73 73 61 67 65 22 29 0d |temp("me|ssage").|
|00000ba0| 03 98 1d 69 6e 70 75 74 | 25 3d a4 6c 6f 61 64 74 |...input|%=.loadt|
|00000bb0| 65 6d 70 28 22 69 6e 70 | 75 74 22 29 0d 03 a2 1d |emp("inp|ut")....|
|00000bc0| 79 65 73 6e 6f 25 3d a4 | 6c 6f 61 64 74 65 6d 70 |yesno%=.|loadtemp|
|00000bd0| 28 22 79 65 73 6e 6f 22 | 29 0d 03 ac 2a 73 79 73 |("yesno"|)...*sys|
|00000be0| 6d 73 67 25 3d a4 6c 6f | 61 64 74 65 6d 70 28 22 |msg%=.lo|adtemp("|
|00000bf0| 73 79 73 6d 73 67 22 29 | 3a 73 79 73 6d 73 67 77 |sysmsg")|:sysmsgw|
|00000c00| 25 3d 30 0d 03 b6 1b c8 | 99 20 22 57 69 6d 70 5f |%=0.....|. "Wimp_|
|00000c10| 43 6c 6f 73 65 54 65 6d | 70 6c 61 74 65 22 0d 03 |CloseTem|plate"..|
|00000c20| c0 0f 76 65 72 24 3d 22 | 30 2e 33 34 22 0d 03 ca |..ver$="|0.34"...|
|00000c30| 4d f2 73 65 74 69 63 6f | 6e 73 74 72 69 6e 67 28 |M.setico|nstring(|
|00000c40| 69 6e 66 6f 25 2c 34 2c | 76 65 72 24 2b 22 64 20 |info%,4,|ver$+"d |
|00000c50| 28 31 31 2d 41 70 72 2d | 31 39 39 35 29 22 29 3a |(11-Apr-|1995)"):|
|00000c60| f2 73 65 74 76 28 22 24 | 76 65 72 22 2c c3 28 31 |.setv("$|ver",.(1|
|00000c70| 30 30 2a bb 76 65 72 24 | 29 29 0d 03 d4 26 73 64 |00*.ver$|))...&sd|
|00000c80| 69 63 24 3d 22 6e 6f 64 | 65 76 22 3a 69 63 6f 6e |ic$="nod|ev":icon|
|00000c90| 30 25 3d a4 69 63 28 73 | 64 69 63 24 2c 2d 31 29 |0%=.ic(s|dic$,-1)|
|00000ca0| 0d 03 de 27 e7 69 63 6f | 6e 30 25 3d 30 8c 85 30 |...'.ico|n0%=0..0|
|00000cb0| 2c 22 43 6f 75 6c 64 6e | 27 74 20 63 72 65 61 74 |,"Couldn|'t creat|
|00000cc0| 65 20 69 63 6f 6e 22 0d | 03 e8 27 4d 25 3d 25 31 |e icon".|..'M%=%1|
|00000cd0| 30 30 30 30 30 30 31 31 | 30 30 30 30 30 31 31 30 |00000011|00000110|
|00000ce0| 30 30 30 3a 73 6c 69 63 | 65 25 3d 2d 32 30 0d 03 |000:slic|e%=-20..|
|00000cf0| f2 36 c8 99 22 4f 53 5f | 52 65 61 64 4d 6f 6e 6f |.6.."OS_|ReadMono|
|00000d00| 74 6f 6e 69 63 54 69 6d | 65 22 b8 6c 61 73 74 70 |tonicTim|e".lastp|
|00000d10| 6f 6c 6c 25 3a 74 69 6d | 65 25 3d 6c 61 73 74 70 |oll%:tim|e%=lastp|
|00000d20| 6f 6c 6c 25 0d 03 fc 31 | 63 68 65 63 6b 61 6c 61 |oll%...1|checkala|
|00000d30| 72 6d 25 3d 74 69 6d 65 | 25 3a 63 68 65 63 6b 6c |rm%=time|%:checkl|
|00000d40| 69 6e 65 25 3d 74 69 6d | 65 25 3a f2 63 68 65 63 |ine%=tim|e%:.chec|
|00000d50| 6b 69 63 6f 6e 0d 04 06 | 0e f2 63 6c 65 61 72 6c |kicon...|..clearl|
|00000d60| 65 64 73 0d 04 10 28 f2 | 63 68 61 6e 67 65 62 75 |eds...(.|changebu|
|00000d70| 74 74 6f 6e 28 73 74 61 | 74 75 73 25 2c 31 31 2c |tton(sta|tus%,11,|
|00000d80| 22 6e 6f 72 65 64 69 61 | 6c 22 29 0d 04 1a 05 e1 |"noredia|l").....|
|00000d90| 0d 04 24 04 0d 04 2e 0f | dd a4 63 68 65 63 6b 73 |..$.....|..checks|
|00000da0| 6c 6f 74 0d 04 38 12 ea | 6d 25 2c 66 25 2c 6d 69 |lot..8..|m%,f%,mi|
|00000db0| 6e 66 72 65 25 0d 04 42 | 11 6d 69 6e 66 72 65 25 |nfre%..B|.minfre%|
|00000dc0| 3d 26 34 30 30 30 0d 04 | 4c 50 f4 20 69 66 20 6d |=&4000..|LP. if m|
|00000dd0| 6f 72 65 20 74 68 61 6e | 20 32 4d 62 79 74 65 73 |ore than| 2Mbytes|
|00000de0| 20 66 72 65 65 2c 20 69 | 6e 73 69 73 74 20 6f 6e | free, i|nsist on|
|00000df0| 20 33 32 6b 20 73 70 61 | 63 65 20 69 6e 20 77 69 | 32k spa|ce in wi|
|00000e00| 6d 70 73 6c 6f 74 20 28 | 6f 74 68 65 72 77 69 73 |mpslot (|otherwis|
|00000e10| 65 20 31 36 6b 29 0d 04 | 56 3b c8 99 22 57 69 6d |e 16k)..|V;.."Wim|
|00000e20| 70 5f 53 6c 6f 74 53 69 | 7a 65 22 2c 2d 31 2c 2d |p_SlotSi|ze",-1,-|
|00000e30| 31 b8 2c 2c 66 25 3a e7 | 66 25 3e 26 32 30 30 30 |1.,,f%:.|f%>&2000|
|00000e40| 30 30 20 8c 6d 69 6e 66 | 72 65 25 3d 26 38 30 30 |00 .minf|re%=&800|
|00000e50| 30 0d 04 60 14 e7 28 93 | 2d e0 29 3c 6d 69 6e 66 |0..`..(.|-.)<minf|
|00000e60| 72 65 25 20 8c 0d 04 6a | 2e 20 20 6d 25 3d 6d 69 |re% ...j|. m%=mi|
|00000e70| 6e 66 72 65 25 3a f5 c8 | 99 22 57 69 6d 70 5f 53 |nfre%:..|."Wimp_S|
|00000e80| 6c 6f 74 53 69 7a 65 22 | 2c 2d 31 2c 2d 31 b8 2c |lotSize"|,-1,-1.,|
|00000e90| 2c 66 25 0d 04 74 25 20 | 20 20 20 e7 66 25 3c 6d |,f%..t% | .f%<m|
|00000ea0| 25 20 f2 73 79 73 6d 73 | 67 30 28 22 4e 65 65 64 |% .sysms|g0("Need|
|00000eb0| 6d 65 6d 31 22 2c 31 29 | 0d 04 7e 0d 20 20 fd 66 |mem1",1)|..~. .f|
|00000ec0| 25 3e 3d 6d 25 0d 04 88 | 07 20 20 cc 0d 04 92 0a |%>=m%...|. .....|
|00000ed0| 20 20 6d 25 3d 30 0d 04 | 9c 05 cd 0d 04 a6 07 3d | m%=0..|.......=|
|00000ee0| 6d 25 0d 04 b0 04 0d 04 | ba 11 dd a4 66 72 65 65 |m%......|....free|
|00000ef0| 6d 65 6d 28 63 25 29 0d | 04 c4 24 ea 66 25 3a c8 |mem(c%).|..$.f%:.|
|00000f00| 99 22 57 69 6d 70 5f 53 | 6c 6f 74 53 69 7a 65 22 |."Wimp_S|lotSize"|
|00000f10| 2c 2d 31 2c 2d 31 b8 2c | 2c 66 25 0d 04 ce 23 e7 |,-1,-1.,|,f%...#.|
|00000f20| 28 66 25 2b 28 63 25 2a | 31 30 32 34 29 29 3e 30 |(f%+(c%*|1024))>0|
|00000f30| 8c 66 25 2b 3d 28 63 25 | 2a 31 30 32 34 29 0d 04 |.f%+=(c%|*1024)..|
|00000f40| d8 07 3d 66 25 0d 04 e2 | 04 0d 04 ec 12 dd a4 6c |..=f%...|.......l|
|00000f50| 6f 61 64 74 65 6d 70 28 | 41 24 29 0d 04 f6 1b ea |oadtemp(|A$).....|
|00000f60| 62 25 2c 69 25 2c 73 25 | 2c 73 63 72 25 2c 69 63 |b%,i%,s%|,scr%,ic|
|00000f70| 6f 6e 25 2c 68 25 0d 05 | 00 30 c8 99 22 57 69 6d |on%,h%..|.0.."Wim|
|00000f80| 70 5f 4c 6f 61 64 54 65 | 6d 70 6c 61 74 65 22 2c |p_LoadTe|mplate",|
|00000f90| 2c 2d 31 2c 30 2c 30 2c | 2d 31 2c 41 24 2c 30 b8 |,-1,0,0,|-1,A$,0.|
|00000fa0| 2c 62 25 2c 69 25 0d 05 | 0a 2a 73 25 3d a4 63 6c |,b%,i%..|.*s%=.cl|
|00000fb0| 61 69 6d 6d 65 6d 28 73 | 63 72 25 2c 62 25 2c 22 |aimmem(s|cr%,b%,"|
|00000fc0| 54 42 55 46 22 29 3a de | 69 63 6f 6e 25 20 69 25 |TBUF"):.|icon% i%|
|00000fd0| 0d 05 14 36 c8 99 22 57 | 69 6d 70 5f 4c 6f 61 64 |...6.."W|imp_Load|
|00000fe0| 54 65 6d 70 6c 61 74 65 | 22 2c 2c 73 63 72 25 2c |Template|",,scr%,|
|00000ff0| 69 63 6f 6e 25 2c 69 63 | 6f 6e 25 2b 69 25 2c 2d |icon%,ic|on%+i%,-|
|00001000| 31 2c 41 24 2c 30 0d 05 | 1e 21 e7 41 24 3d 22 6d |1,A$,0..|.!.A$="m|
|00001010| 65 73 73 61 67 65 22 8c | 6d 73 67 74 74 6c 25 3d |essage".|msgttl%=|
|00001020| 73 63 72 25 21 37 32 0d | 05 28 2b e7 41 24 3d 22 |scr%!72.|.(+.A$="|
|00001030| 53 74 61 74 75 73 22 8c | f2 73 65 74 77 70 6f 73 |Status".|.setwpos|
|00001040| 28 73 63 72 25 2c 73 74 | 77 78 25 2c 73 74 77 79 |(scr%,st|wx%,stwy|
|00001050| 25 29 0d 05 32 14 73 63 | 72 25 21 36 34 3d 73 70 |%)..2.sc|r%!64=sp|
|00001060| 72 69 74 65 73 25 0d 05 | 3c 23 c8 99 22 57 69 6d |rites%..|<#.."Wim|
|00001070| 70 5f 43 72 65 61 74 65 | 57 69 6e 64 6f 77 22 2c |p_Create|Window",|
|00001080| 2c 73 63 72 25 20 b8 68 | 25 0d 05 46 13 f2 72 65 |,scr% .h|%..F..re|
|00001090| 6c 65 61 73 65 6d 65 6d | 28 73 25 29 0d 05 50 07 |leasemem|(s%)..P.|
|000010a0| 3d 68 25 0d 05 5a 04 0d | 05 64 17 dd f2 73 65 74 |=h%..Z..|.d...set|
|000010b0| 77 70 6f 73 28 71 25 2c | 78 25 2c 79 25 29 0d 05 |wpos(q%,|x%,y%)..|
|000010c0| 6e 0a ea 77 25 2c 68 25 | 0d 05 78 0a e7 78 25 3e |n..w%,h%|..x..x%>|
|000010d0| 30 8c 0d 05 82 1d 77 25 | 3d 71 25 21 38 2d 21 71 |0.....w%|=q%!8-!q|
|000010e0| 25 3a 68 25 3d 71 25 21 | 31 32 2d 71 25 21 34 0d |%:h%=q%!|12-q%!4.|
|000010f0| 05 8c 15 21 71 25 3d 78 | 25 3a 71 25 21 38 3d 78 |...!q%=x|%:q%!8=x|
|00001100| 25 2b 77 25 0d 05 96 17 | 71 25 21 34 3d 79 25 3a |%+w%....|q%!4=y%:|
|00001110| 71 25 21 31 32 3d 79 25 | 2b 68 25 0d 05 a0 05 cd |q%!12=y%|+h%.....|
|00001120| 0d 05 aa 05 e1 0d 05 b4 | 04 0d 05 be 31 f4 20 6d |........|....1. m|
|00001130| 65 72 67 65 20 73 70 72 | 69 74 65 20 66 69 6c 65 |erge spr|ite file|
|00001140| 20 69 6e 74 6f 20 73 6c | 69 70 64 69 61 6c 20 73 | into sl|ipdial s|
|00001150| 70 72 69 74 65 20 61 72 | 65 61 0d 05 c8 16 dd a4 |prite ar|ea......|
|00001160| 6d 65 72 67 65 73 70 72 | 69 74 65 73 28 41 24 29 |mergespr|ites(A$)|
|00001170| 0d 05 d2 15 ea 73 25 2c | 66 25 2c 6e 25 2c 72 25 |.....s%,|f%,n%,r%|
|00001180| 3a 72 25 3d 30 0d 05 dc | 1f c8 99 22 58 4f 53 5f |:r%=0...|..."XOS_|
|00001190| 46 69 6c 65 22 2c 31 37 | 2c 41 24 b8 41 25 2c 2c |File",17|,A$.A%,,|
|000011a0| 2c 2c 53 25 0d 05 e6 2e | c8 99 22 58 4f 53 5f 53 |,,S%....|.."XOS_S|
|000011b0| 70 72 69 74 65 4f 70 22 | 2c 26 31 30 38 2c 73 70 |priteOp"|,&108,sp|
|000011c0| 72 69 74 65 73 25 b8 2c | 2c 73 25 2c 6e 25 2c 2c |rites%.,|,s%,n%,,|
|000011d0| 66 25 0d 05 f0 17 e7 41 | 25 3d 31 80 53 25 3c 3d |f%.....A|%=1.S%<=|
|000011e0| 28 73 25 2d 66 25 29 20 | 8c 0d 05 fa 32 20 20 c8 |(s%-f%) |....2 .|
|000011f0| 99 22 58 4f 53 5f 53 70 | 72 69 74 65 4f 70 22 2c |."XOS_Sp|riteOp",|
|00001200| 26 31 30 42 2b 28 6e 25 | 3d 30 29 2c 73 70 72 69 |&10B+(n%|=0),spri|
|00001210| 74 65 73 25 2c 41 24 b8 | 3b 46 25 0d 06 04 1c 20 |tes%,A$.|;F%.... |
|00001220| 20 e7 28 46 25 80 31 29 | 3d 30 20 8c 72 25 3d 73 | .(F%.1)|=0 .r%=s|
|00001230| 25 2d 66 25 2d 53 25 0d | 06 0e 07 20 20 cc 0d 06 |%-f%-S%.|... ...|
|00001240| 18 23 20 20 f2 77 61 72 | 6e 5f 74 78 74 28 a4 6d |.# .war|n_txt(.m|
|00001250| 73 67 30 28 22 45 6c 6f | 61 64 69 63 6f 6e 22 29 |sg0("Elo|adicon")|
|00001260| 29 0d 06 22 05 cd 0d 06 | 2c 07 3d 72 25 0d 06 36 |).."....|,.=r%..6|
|00001270| 04 0d 06 40 0b dd a4 73 | 66 72 65 65 0d 06 4a 33 |...@...s|free..J3|
|00001280| ea 73 25 2c 66 25 3a c8 | 99 22 58 4f 53 5f 53 70 |.s%,f%:.|."XOS_Sp|
|00001290| 72 69 74 65 4f 70 22 2c | 26 31 30 38 2c 73 70 72 |riteOp",|&108,spr|
|000012a0| 69 74 65 73 25 b8 2c 2c | 73 25 2c 2c 2c 66 25 0d |ites%.,,|s%,,,f%.|
|000012b0| 06 54 0a 3d 73 25 2d 66 | 25 0d 06 5e 04 0d 06 68 |.T.=s%-f|%..^...h|
|000012c0| 4d f4 20 70 6c 61 63 65 | 73 20 61 6e 20 69 63 6f |M. place|s an ico|
|000012d0| 6e 20 6f 6e 20 74 68 65 | 20 69 63 6f 6e 62 61 72 |n on the| iconbar|
|000012e0| 2c 20 6e 25 3c 30 20 69 | 73 20 6d 61 69 6e 20 69 |, n%<0 i|s main i|
|000012f0| 63 6f 6e 2c 20 6f 74 68 | 65 72 73 20 61 72 65 20 |con, oth|ers are |
|00001300| 75 73 65 72 20 69 63 6f | 6e 73 0d 06 72 0f dd a4 |user ico|ns..r...|
|00001310| 69 63 28 41 24 2c 6e 25 | 29 0d 06 7c 16 ea 5a 25 |ic(A$,n%|)..|..Z%|
|00001320| 2c 6e 65 78 74 25 2c 77 | 25 2c 68 25 2c 46 25 0d |,next%,w|%,h%,F%.|
|00001330| 06 86 34 c8 99 22 58 4f | 53 5f 53 70 72 69 74 65 |..4.."XO|S_Sprite|
|00001340| 4f 70 22 2c 26 31 30 30 | 2b 34 30 2c 73 70 72 69 |Op",&100|+40,spri|
|00001350| 74 65 73 25 2c 41 24 b8 | 2c 2c 2c 77 25 2c 68 25 |tes%,A$.|,,,w%,h%|
|00001360| 3b 46 25 0d 06 90 1e e7 | 28 46 25 80 31 29 3e 30 |;F%.....|(F%.1)>0|
|00001370| 84 77 25 3e 32 30 30 84 | 68 25 3e 31 30 30 8c 3d |.w%>200.|h%>100.=|
|00001380| 30 0d 06 9a 0a e7 6e 25 | 3c 30 8c 0d 06 a4 18 20 |0.....n%|<0..... |
|00001390| 20 21 69 63 6f 6e 73 25 | 3d 2d 31 3a 6e 65 78 74 | !icons%|=-1:next|
|000013a0| 25 3d 30 0d 06 ae 37 20 | 20 f4 20 64 69 6d 65 6e |%=0...7 | . dimen|
|000013b0| 73 69 6f 6e 20 6d 65 6d | 6f 72 79 20 69 6e 20 6b |sion mem|ory in k|
|000013c0| 6e 6f 77 6e 20 6c 6f 63 | 61 74 69 6f 6e 20 26 20 |nown loc|ation & |
|000013d0| 73 74 6f 72 65 20 6e 61 | 6d 65 0d 06 b8 34 20 20 |store na|me...4 |
|000013e0| de 69 62 61 72 6e 61 6d | 65 25 31 32 3a 24 69 62 |.ibarnam|e%12:$ib|
|000013f0| 61 72 6e 61 6d 65 25 3d | 41 24 3a 69 63 6f 6e 73 |arname%=|A$:icons|
|00001400| 25 21 32 34 3d 69 62 61 | 72 6e 61 6d 65 25 0d 06 |%!24=iba|rname%..|
|00001410| c2 05 cc 0d 06 cc 12 20 | 20 6e 65 78 74 25 3d 69 |....... | next%=i|
|00001420| 63 6f 6e 30 25 0d 06 d6 | 2c 20 20 e3 5a 25 3d 30 |con0%...|, .Z%=0|
|00001430| b8 6e 25 3a e7 69 62 61 | 72 25 28 5a 25 29 3e 30 |.n%:.iba|r%(Z%)>0|
|00001440| 20 8c 6e 65 78 74 25 3d | 69 62 61 72 25 28 5a 25 | .next%=|ibar%(Z%|
|00001450| 29 0d 06 e0 12 20 20 ed | 3a 21 69 63 6f 6e 73 25 |).... .|:!icons%|
|00001460| 3d 2d 33 0d 06 ea 2a 20 | 20 f4 20 64 69 6d 65 6e |=-3...* | . dimen|
|00001470| 73 69 6f 6e 20 73 6f 6d | 65 20 6d 65 6d 6f 72 79 |sion som|e memory|
|00001480| 20 26 20 73 74 6f 72 65 | 20 6e 61 6d 65 0d 06 f4 | & store| name...|
|00001490| 23 20 20 de 69 63 6f 6e | 73 25 21 32 34 20 31 32 |# .icon|s%!24 12|
|000014a0| 3a 24 28 69 63 6f 6e 73 | 25 21 32 34 29 3d 41 24 |:$(icons|%!24)=A$|
|000014b0| 0d 06 fe 05 cd 0d 07 08 | 46 69 63 6f 6e 73 25 21 |........|Ficons%!|
|000014c0| 34 3d 30 3a 69 63 6f 6e | 73 25 21 38 3d 30 3a 69 |4=0:icon|s%!8=0:i|
|000014d0| 63 6f 6e 73 25 21 31 32 | 3d 77 25 2a 32 3a 69 63 |cons%!12|=w%*2:ic|
|000014e0| 6f 6e 73 25 21 31 36 3d | 31 30 30 3a 69 63 6f 6e |ons%!16=|100:icon|
|000014f0| 73 25 21 32 30 3d 26 33 | 31 30 32 0d 07 12 23 69 |s%!20=&3|102...#i|
|00001500| 63 6f 6e 73 25 21 32 38 | 3d 73 70 72 69 74 65 73 |cons%!28|=sprites|
|00001510| 25 3a 69 63 6f 6e 73 25 | 21 33 32 3d 31 31 0d 07 |%:icons%|!32=11..|
|00001520| 1c 29 c8 99 20 22 57 69 | 6d 70 5f 43 72 65 61 74 |.).. "Wi|mp_Creat|
|00001530| 65 49 63 6f 6e 22 2c 6e | 65 78 74 25 2c 69 63 6f |eIcon",n|ext%,ico|
|00001540| 6e 73 25 b8 69 63 25 0d | 07 26 08 3d 69 63 25 0d |ns%.ic%.|.&.=ic%.|
|00001550| 07 30 04 0d 07 3a 1a f4 | 20 75 70 64 61 74 65 20 |.0...:..| update |
|00001560| 74 68 65 20 6d 61 69 6e | 20 69 63 6f 6e 0d 07 44 |the main| icon..D|
|00001570| 0f dd f2 63 68 65 63 6b | 69 63 6f 6e 0d 07 4e 0a |...check|icon..N.|
|00001580| ea 6e 61 6d 65 24 0d 07 | 58 10 e7 64 65 76 69 63 |.name$..|X..devic|
|00001590| 65 25 3d a3 20 8c 0d 07 | 62 13 20 20 6e 61 6d 65 |e%=. ...|b. name|
|000015a0| 24 3d 22 6e 6f 64 65 76 | 22 0d 07 6c 07 20 20 cc |$="nodev|"..l. .|
|000015b0| 0d 07 76 1f 20 20 e7 20 | 28 a4 64 28 39 2c 70 6f |..v. . |(.d(9,po|
|000015c0| 72 74 25 2c 30 2c 30 29 | 80 38 29 3d 30 20 8c 0d |rt%,0,0)|.8)=0 ..|
|000015d0| 07 80 13 20 20 20 20 6e | 61 6d 65 24 3d 22 64 65 |... n|ame$="de|
|000015e0| 76 22 0d 07 8a 09 20 20 | 20 20 cc 0d 07 94 39 20 |v".... | ....9 |
|000015f0| 20 20 20 e7 73 64 69 63 | 24 3d 22 6f 6e 6c 69 6e | .sdic|$="onlin|
|00001600| 65 31 22 20 8c 6e 61 6d | 65 24 3d 22 6f 6e 6c 69 |e1" .nam|e$="onli|
|00001610| 6e 65 32 22 8b 6e 61 6d | 65 24 3d 22 6f 6e 6c 69 |ne2".nam|e$="onli|
|00001620| 6e 65 31 22 0d 07 9e 07 | 20 20 cd 0d 07 a8 05 cd |ne1"....| ......|
|00001630| 0d 07 b2 14 63 68 65 63 | 6b 6c 69 6e 65 25 3d 74 |....chec|kline%=t|
|00001640| 69 6d 65 25 0d 07 bc 1f | e7 69 62 61 72 6e 61 6d |ime%....|.ibarnam|
|00001650| 65 25 3e 30 80 6e 61 6d | 65 24 3c 3e 73 64 69 63 |e%>0.nam|e$<>sdic|
|00001660| 24 20 8c 0d 07 c6 1c 20 | 20 f2 63 61 6c 6c 5f 6c |$ ..... | .call_l|
|00001670| 6f 67 28 73 64 69 63 24 | 2c 6e 61 6d 65 24 29 0d |og(sdic$|,name$).|
|00001680| 07 d0 11 20 20 73 64 69 | 63 24 3d 6e 61 6d 65 24 |... sdi|c$=name$|
|00001690| 0d 07 da 35 20 20 c8 99 | 20 22 58 4f 53 5f 53 70 |...5 ..| "XOS_Sp|
|000016a0| 72 69 74 65 4f 70 22 2c | 26 31 31 38 2c 73 70 72 |riteOp",|&118,spr|
|000016b0| 69 74 65 73 25 2c 6e 61 | 6d 65 24 b8 2c 2c 73 72 |ites%,na|me$.,,sr|
|000016c0| 63 25 3b 46 25 0d 07 e4 | 10 20 20 e7 28 46 25 80 |c%;F%...|. .(F%.|
|000016d0| 31 29 3d 30 8c 0d 07 ee | 3a 20 20 20 20 24 69 62 |1)=0....|: $ib|
|000016e0| 61 72 6e 61 6d 65 25 3d | 6e 61 6d 65 24 3a 21 71 |arname%=|name$:!q|
|000016f0| 25 3d 2d 31 3a 71 25 21 | 34 3d 69 63 6f 6e 30 25 |%=-1:q%!|4=icon0%|
|00001700| 3a 71 25 21 38 3d 30 3a | 71 25 21 31 32 3d 30 0d |:q%!8=0:|q%!12=0.|
|00001710| 07 f8 21 20 20 20 20 c8 | 99 22 57 69 6d 70 5f 53 |..! .|."Wimp_S|
|00001720| 65 74 49 63 6f 6e 53 74 | 61 74 65 22 2c 2c 71 25 |etIconSt|ate",,q%|
|00001730| 0d 08 02 07 20 20 cd 0d | 08 0c 05 cd 0d 08 16 05 |.... ..|........|
|00001740| e1 0d 08 20 04 0d 08 2a | 33 f4 20 75 70 64 61 74 |... ...*|3. updat|
|00001750| 65 20 63 61 6c 6c 20 6c | 6f 67 20 6f 6e 20 6f 6e |e call l|og on on|
|00001760| 6c 69 6e 65 2d 6f 66 66 | 6c 69 6e 65 20 74 72 61 |line-off|line tra|
|00001770| 6e 73 69 74 69 6f 6e 73 | 0d 08 34 15 dd f2 63 61 |nsitions|..4...ca|
|00001780| 6c 6c 5f 6c 6f 67 28 41 | 24 2c 42 24 29 0d 08 3e |ll_log(A|$,B$)..>|
|00001790| 0a c8 8e 42 24 20 ca 0d | 08 48 53 20 20 c9 22 6e |...B$ ..|.HS ."n|
|000017a0| 6f 64 65 76 22 3a e7 41 | 24 3d 22 6f 6e 6c 69 6e |odev":.A|$="onlin|
|000017b0| 65 31 22 84 41 24 3d 22 | 6f 6e 6c 69 6e 65 32 22 |e1".A$="|online2"|
|000017c0| 84 41 24 3d 22 64 65 76 | 22 8c f2 77 63 6c 6f 67 |.A$="dev|"..wclog|
|000017d0| 28 22 6f 66 66 6c 69 6e | 65 20 61 66 74 65 72 20 |("offlin|e after |
|000017e0| 22 2b 6f 6e 6c 69 6e 65 | 24 29 0d 08 52 52 20 20 |"+online|$)..RR |
|000017f0| c9 22 6f 6e 6c 69 6e 65 | 31 22 3a e7 41 24 3c 3e |."online|1":.A$<>|
|00001800| 22 6f 6e 6c 69 6e 65 32 | 22 8c f2 77 63 6c 6f 67 |"online2|"..wclog|
|00001810| 28 22 6f 6e 6c 69 6e 65 | 20 74 6f 20 22 2b 6e 75 |("online| to "+nu|
|00001820| 6d 24 29 3a 6f 6e 74 69 | 6d 65 25 3d 74 69 6d 65 |m$):onti|me%=time|
|00001830| 25 3a 8b f2 75 70 64 5f | 74 69 6d 65 0d 08 5c 1a |%:..upd_|time..\.|
|00001840| 20 20 c9 22 6f 6e 6c 69 | 6e 65 32 22 3a f2 75 70 | ."onli|ne2":.up|
|00001850| 64 5f 74 69 6d 65 0d 08 | 66 05 cb 0d 08 70 05 e1 |d_time..|f....p..|
|00001860| 0d 08 7a 04 0d 08 84 28 | f4 20 75 70 64 61 74 65 |..z....(|. update|
|00001870| 20 74 69 6d 65 72 20 69 | 63 6f 6e 20 69 6e 20 73 | timer i|con in s|
|00001880| 74 61 74 75 73 20 77 69 | 6e 64 6f 77 0d 08 8e 0e |tatus wi|ndow....|
|00001890| dd f2 75 70 64 5f 74 69 | 6d 65 0d 08 98 07 ea 54 |..upd_ti|me.....T|
|000018a0| 25 0d 08 a2 1b 54 25 3d | 94 28 74 69 6d 65 25 2d |%....T%=|.(time%-|
|000018b0| 6f 6e 74 69 6d 65 25 29 | 81 31 30 30 0d 08 ac 22 |ontime%)|.100..."|
|000018c0| 6f 6e 6c 69 6e 65 24 3d | c2 22 30 22 2b c3 28 54 |online$=|."0"+.(T|
|000018d0| 25 81 33 36 30 30 29 2c | 32 29 2b 22 3a 22 0d 08 |%.3600),|2)+":"..|
|000018e0| b6 26 6f 6e 6c 69 6e 65 | 24 2b 3d c2 22 30 22 2b |.&online|$+=."0"+|
|000018f0| c3 28 28 54 25 81 36 30 | 29 83 36 30 29 2c 32 29 |.((T%.60|).60),2)|
|00001900| 2b 22 3a 22 0d 08 c0 1d | 6f 6e 6c 69 6e 65 24 2b |+":"....|online$+|
|00001910| 3d c2 22 30 22 2b c3 28 | 54 25 83 36 30 29 2c 32 |=."0"+.(|T%.60),2|
|00001920| 29 0d 08 ca 20 f2 75 70 | 64 5f 69 63 6f 6e 28 73 |)... .up|d_icon(s|
|00001930| 74 61 74 75 73 25 2c 38 | 2c 6f 6e 6c 69 6e 65 24 |tatus%,8|,online$|
|00001940| 29 0d 08 d4 05 e1 0d 08 | de 04 0d 08 e8 21 f4 20 |).......|.....!. |
|00001950| 77 72 69 74 65 20 61 20 | 6c 69 6e 65 20 74 6f 20 |write a |line to |
|00001960| 74 68 65 20 6c 6f 67 66 | 69 6c 65 0d 08 f2 0f dd |the logf|ile.....|
|00001970| f2 77 63 6c 6f 67 28 41 | 24 29 0d 08 fc 23 66 68 |.wclog(A|$)...#fh|
|00001980| 31 25 3d a4 6f 70 65 6e | 75 70 28 73 64 64 69 72 |1%=.open|up(sddir|
|00001990| 24 2b 22 2e 6c 6f 67 66 | 69 6c 65 22 29 0d 09 06 |$+".logf|ile")...|
|000019a0| 4f e7 66 68 31 25 3c 3e | 30 8c cf 23 66 68 31 25 |O.fh1%<>|0..#fh1%|
|000019b0| 3d a2 23 66 68 31 25 3a | d5 23 66 68 31 25 2c a4 |=.#fh1%:|.#fh1%,.|
|000019c0| 63 74 69 6d 65 28 22 23 | 20 25 59 52 25 4d 4e 25 |ctime("#| %YR%MN%|
|000019d0| 44 59 20 25 32 34 25 4d | 49 25 53 45 20 22 29 2b |DY %24%M|I%SE ")+|
|000019e0| 41 24 3a f2 63 66 28 66 | 68 31 25 29 0d 09 10 05 |A$:.cf(f|h1%)....|
|000019f0| e1 0d 09 1a 04 0d 09 24 | 0f dd a4 63 74 69 6d 65 |.......$|...ctime|
|00001a00| 28 61 24 29 0d 09 2e 23 | ea 62 25 3a 3f 74 6d 70 |(a$)...#|.b%:?tmp|
|00001a10| 25 3d 33 3a c8 99 22 4f | 53 5f 57 6f 72 64 22 2c |%=3:.."O|S_Word",|
|00001a20| 31 34 2c 74 6d 70 25 0d | 09 38 3e c8 99 22 54 65 |14,tmp%.|.8>.."Te|
|00001a30| 72 72 69 74 6f 72 79 5f | 43 6f 6e 76 65 72 74 44 |rritory_|ConvertD|
|00001a40| 61 74 65 41 6e 64 54 69 | 6d 65 22 2c 31 2c 74 6d |ateAndTi|me",1,tm|
|00001a50| 70 25 2c 74 6d 70 25 2b | 31 32 38 2c 31 32 38 2c |p%,tmp%+|128,128,|
|00001a60| 61 24 b8 62 25 0d 09 42 | 0d 3d a4 73 74 72 28 62 |a$.b%..B|.=.str(b|
|00001a70| 25 29 0d 09 4c 04 0d 09 | 56 11 dd f2 70 6f 6c 6c |%)..L...|V...poll|
|00001a80| 28 69 64 6c 65 25 29 0d | 09 60 38 f4 20 69 64 6c |(idle%).|.`8. idl|
|00001a90| 65 25 3d 70 6f 6c 6c 69 | 64 6c 65 20 74 69 6d 65 |e%=polli|dle time|
|00001aa0| 20 28 2b 29 20 6f 72 20 | 74 69 6d 65 20 62 65 66 | (+) or |time bef|
|00001ab0| 6f 72 65 20 70 6f 6c 6c | 69 6e 67 20 28 2d 29 0d |ore poll|ing (-).|
|00001ac0| 09 6a 23 c8 99 22 4f 53 | 5f 52 65 61 64 4d 6f 6e |.j#.."OS|_ReadMon|
|00001ad0| 6f 74 6f 6e 69 63 54 69 | 6d 65 22 20 b8 74 69 6d |otonicTi|me" .tim|
|00001ae0| 65 25 0d 09 74 27 e7 69 | 64 6c 65 25 3e 3d 30 20 |e%..t'.i|dle%>=0 |
|00001af0| 84 20 6c 61 73 74 70 6f | 6c 6c 25 2d 74 69 6d 65 |. lastpo|ll%-time|
|00001b00| 25 3c 69 64 6c 65 25 20 | 8c 0d 09 7e 15 20 20 6c |%<idle% |...~. l|
|00001b10| 61 73 74 70 6f 6c 6c 25 | 3d 74 69 6d 65 25 0d 09 |astpoll%|=time%..|
|00001b20| 88 07 20 20 f5 0d 09 92 | 31 20 20 20 20 c8 99 20 |.. ....|1 .. |
|00001b30| 22 57 69 6d 70 5f 50 6f | 6c 6c 49 64 6c 65 22 2c |"Wimp_Po|llIdle",|
|00001b40| 4d 25 2c 71 25 2c 74 69 | 6d 65 25 2b 69 64 6c 65 |M%,q%,ti|me%+idle|
|00001b50| 25 20 b8 20 52 25 0d 09 | 9c 48 20 20 20 20 e7 64 |% . R%..|.H .d|
|00001b60| 65 76 69 63 65 25 20 8c | 20 4a 25 3d a4 64 28 31 |evice% .| J%=.d(1|
|00001b70| 39 2c 70 6f 72 74 25 2c | 30 2c 30 29 3a f4 20 6c |9,port%,|0,0):. l|
|00001b80| 69 6e 65 20 74 6f 20 66 | 69 78 20 49 49 20 64 75 |ine to f|ix II du|
|00001b90| 61 6c 20 73 65 72 69 61 | 6c 20 63 61 72 64 0d 09 |al seria|l card..|
|00001ba0| a6 0f 20 20 20 20 c8 8e | 20 52 25 20 ca 0d 09 b0 |.. ..| R% ....|
|00001bb0| 1a 20 20 20 20 c9 20 31 | 20 3a f2 72 65 64 72 61 |. . 1| :.redra|
|00001bc0| 77 77 28 21 71 25 29 0d | 09 ba 40 20 20 20 20 c9 |ww(!q%).|..@ .|
|00001bd0| 20 32 20 3a f2 6f 70 65 | 6e 77 28 21 71 25 2c 71 | 2 :.ope|nw(!q%,q|
|00001be0| 25 21 34 2c 71 25 21 38 | 2c 71 25 21 31 32 2c 71 |%!4,q%!8|,q%!12,q|
|00001bf0| 25 21 31 36 2c 71 25 21 | 32 30 2c 71 25 21 32 34 |%!16,q%!|20,q%!24|
|00001c00| 2c 71 25 21 32 38 29 0d | 09 c4 19 20 20 20 20 c9 |,q%!28).|... .|
|00001c10| 20 33 20 3a f2 63 6c 6f | 73 65 77 28 21 71 25 29 | 3 :.clo|sew(!q%)|
|00001c20| 0d 09 ce 2e 20 20 20 20 | c9 20 36 20 3a f2 63 6c |.... |. 6 :.cl|
|00001c30| 69 63 6b 28 21 71 25 2c | 71 25 21 34 2c 71 25 21 |ick(!q%,|q%!4,q%!|
|00001c40| 38 2c 71 25 21 31 32 2c | 71 25 21 31 36 29 0d 09 |8,q%!12,|q%!16)..|
|00001c50| d8 26 20 20 20 20 c9 20 | 38 20 3a f2 6b 65 79 70 |.& . |8 :.keyp|
|00001c60| 72 65 73 73 28 21 71 25 | 2c 71 25 21 34 2c 71 25 |ress(!q%|,q%!4,q%|
|00001c70| 21 32 34 29 0d 09 e2 28 | 20 20 20 20 c9 20 39 20 |!24)...(| . 9 |
|00001c80| 3a f2 67 65 74 70 6f 69 | 6e 74 65 72 3a f2 6d 65 |:.getpoi|nter:.me|
|00001c90| 6e 75 73 65 6c 65 63 74 | 28 71 25 29 0d 09 ec 1c |nuselect|(q%)....|
|00001ca0| 20 20 20 20 c9 20 31 37 | 2c 31 38 3a f2 72 65 63 | . 17|,18:.rec|
|00001cb0| 65 69 76 65 28 71 25 29 | 0d 09 f6 09 20 20 20 20 |eive(q%)|.... |
|00001cc0| cb 0d 0a 00 0b 20 20 fd | 52 25 3d 30 0d 0a 0a 3b |..... .|R%=0...;|
|00001cd0| 20 20 e7 74 69 6d 65 25 | 3e 63 68 65 63 6b 6c 69 | .time%|>checkli|
|00001ce0| 6e 65 25 2b 31 30 30 20 | 8c f2 63 68 65 63 6b 69 |ne%+100 |..checki|
|00001cf0| 63 6f 6e 3a f2 6c 69 6e | 65 61 6c 61 72 6d 3a f2 |con:.lin|ealarm:.|
|00001d00| 73 65 74 74 69 6d 65 0d | 0a 14 31 20 20 e7 74 69 |settime.|..1 .ti|
|00001d10| 6d 65 25 3e 63 68 65 63 | 6b 61 6c 61 72 6d 25 2b |me%>chec|kalarm%+|
|00001d20| 35 30 30 20 8c f2 74 69 | 6d 65 61 6c 61 72 6d 3a |500 ..ti|mealarm:|
|00001d30| f2 73 65 74 64 61 74 65 | 0d 0a 1e 31 20 20 e7 6d |.setdate|...1 .m|
|00001d40| 73 67 5f 63 73 25 3e 30 | 80 74 69 6d 65 25 3e 6d |sg_cs%>0|.time%>m|
|00001d50| 73 67 74 25 2b 35 30 30 | 20 8c f2 61 64 64 6d 65 |sgt%+500| ..addme|
|00001d60| 73 73 61 67 65 28 22 22 | 29 0d 0a 28 05 cd 0d 0a |ssage(""|)..(....|
|00001d70| 32 05 e1 0d 0a 3c 04 0d | 0a 46 18 dd f2 6b 65 79 |2....<..|.F...key|
|00001d80| 70 72 65 73 73 28 77 25 | 2c 69 25 2c 6b 25 29 0d |press(w%|,i%,k%).|
|00001d90| 0a 50 07 ea 6c 25 0d 0a | 5a 16 e7 77 25 3d 74 78 |.P..l%..|Z..w%=tx|
|00001da0| 74 25 80 69 25 3d 69 6e | 69 63 25 8c 0d 0a 64 0b |t%.i%=in|ic%...d.|
|00001db0| 20 20 c8 8e 6b 25 ca 0d | 0a 6e 31 20 20 20 20 c9 | ..k%..|.n1 .|
|00001dc0| 31 33 3a e3 6c 25 3d 31 | 30 b8 31 88 2d 31 3a 69 |13:.l%=1|0.1.-1:i|
|00001dd0| 68 69 73 74 24 28 6c 25 | 29 3d 69 68 69 73 74 24 |hist$(l%|)=ihist$|
|00001de0| 28 6c 25 2d 31 29 3a ed | 0d 0a 78 43 20 20 20 20 |(l%-1):.|..xC |
|00001df0| 20 20 69 68 69 73 74 24 | 28 30 29 3d a4 69 63 5f | ihist$|(0)=.ic_|
|00001e00| 73 74 72 28 77 25 2c 69 | 25 29 3a f2 61 64 64 65 |str(w%,i|%):.adde|
|00001e10| 76 65 6e 74 28 69 68 69 | 73 74 24 28 30 29 2c 30 |vent(ihi|st$(0),0|
|00001e20| 29 3a 69 68 69 73 74 25 | 3d 2d 31 0d 0a 82 44 20 |):ihist%|=-1...D |
|00001e30| 20 20 20 20 20 f2 75 70 | 64 5f 69 63 6f 6e 28 77 | .up|d_icon(w|
|00001e40| 25 2c 69 25 2c 22 22 29 | 3a c8 99 22 57 69 6d 70 |%,i%,"")|:.."Wimp|
|00001e50| 5f 53 65 74 43 61 72 65 | 74 50 6f 73 69 74 69 6f |_SetCare|tPositio|
|00001e60| 6e 22 2c 77 25 2c 69 25 | 2c 2c 2c 2d 31 2c 30 0d |n",w%,i%|,,,-1,0.|
|00001e70| 0a 8c 2d 20 20 20 20 c9 | 26 31 38 46 3a e7 69 68 |..- .|&18F:.ih|
|00001e80| 69 73 74 25 3c 31 30 80 | 69 68 69 73 74 24 28 69 |ist%<10.|ihist$(i|
|00001e90| 68 69 73 74 25 2b 31 29 | 3e 22 22 8c 0d 0a 96 33 |hist%+1)|>""....3|
|00001ea0| 20 20 20 20 20 20 69 68 | 69 73 74 25 2b 3d 31 3a | ih|ist%+=1:|
|00001eb0| f2 75 70 64 5f 69 63 6f | 6e 28 77 25 2c 69 25 2c |.upd_ico|n(w%,i%,|
|00001ec0| 69 68 69 73 74 24 28 69 | 68 69 73 74 25 29 29 0d |ihist$(i|hist%)).|
|00001ed0| 0a a0 3e 20 20 20 20 20 | 20 c8 99 22 57 69 6d 70 |..> | .."Wimp|
|00001ee0| 5f 53 65 74 43 61 72 65 | 74 50 6f 73 69 74 69 6f |_SetCare|tPositio|
|00001ef0| 6e 22 2c 77 25 2c 69 25 | 2c 2c 2c 2d 31 2c a9 69 |n",w%,i%|,,,-1,.i|
|00001f00| 68 69 73 74 24 28 69 68 | 69 73 74 25 29 0d 0a aa |hist$(ih|ist%)...|
|00001f10| 0b 20 20 20 20 20 20 cd | 0d 0a b4 18 20 20 20 20 |. .|.... |
|00001f20| c9 26 31 38 45 3a e7 69 | 68 69 73 74 25 3e 30 8c |.&18E:.i|hist%>0.|
|00001f30| 0d 0a be 33 20 20 20 20 | 20 20 69 68 69 73 74 25 |...3 | ihist%|
|00001f40| 2d 3d 31 3a f2 75 70 64 | 5f 69 63 6f 6e 28 77 25 |-=1:.upd|_icon(w%|
|00001f50| 2c 69 25 2c 69 68 69 73 | 74 24 28 69 68 69 73 74 |,i%,ihis|t$(ihist|
|00001f60| 25 29 29 0d 0a c8 3e 20 | 20 20 20 20 20 c8 99 22 |%))...> | .."|
|00001f70| 57 69 6d 70 5f 53 65 74 | 43 61 72 65 74 50 6f 73 |Wimp_Set|CaretPos|
|00001f80| 69 74 69 6f 6e 22 2c 77 | 25 2c 69 25 2c 2c 2c 2d |ition",w|%,i%,,,-|
|00001f90| 31 2c a9 69 68 69 73 74 | 24 28 69 68 69 73 74 25 |1,.ihist|$(ihist%|
|00001fa0| 29 0d 0a d2 0b 20 20 20 | 20 20 20 cc 0d 0a dc 4e |).... | ....N|
|00001fb0| 20 20 20 20 20 20 69 68 | 69 73 74 25 3d 2d 31 3a | ih|ist%=-1:|
|00001fc0| f2 75 70 64 5f 69 63 6f | 6e 28 77 25 2c 69 25 2c |.upd_ico|n(w%,i%,|
|00001fd0| 22 22 29 3a c8 99 22 57 | 69 6d 70 5f 53 65 74 43 |""):.."W|imp_SetC|
|00001fe0| 61 72 65 74 50 6f 73 69 | 74 69 6f 6e 22 2c 77 25 |aretPosi|tion",w%|
|00001ff0| 2c 69 25 2c 2c 2c 2d 31 | 2c 30 0d 0a e6 0b 20 20 |,i%,,,-1|,0.... |
|00002000| 20 20 20 20 cd 0d 0a f0 | 23 20 20 20 20 7f 3a c8 | ....|# .:.|
|00002010| 99 22 57 69 6d 70 5f 50 | 72 6f 63 65 73 73 4b 65 |."Wimp_P|rocessKe|
|00002020| 79 22 2c 71 25 21 32 34 | 0d 0a fa 07 20 20 cb 0d |y",q%!24|.... ..|
|00002030| 0b 04 05 cc 0d 0b 0e 1a | e7 77 25 3d 69 6e 70 75 |........|.w%=inpu|
|00002040| 74 25 80 69 25 3d 31 80 | 6b 25 3d 31 33 8c 0d 0b |t%.i%=1.|k%=13...|
|00002050| 18 2f 69 6e 70 75 74 24 | 3d a4 69 63 5f 73 74 72 |./input$|=.ic_str|
|00002060| 28 77 25 2c 69 25 29 3a | e7 69 6e 70 75 74 24 3d |(w%,i%):|.input$=|
|00002070| 22 22 8c 69 6e 70 75 74 | 24 3d 22 20 22 0d 0b 22 |"".input|$=" ".."|
|00002080| 05 cc 0d 0b 2c 1d c8 99 | 22 57 69 6d 70 5f 50 72 |....,...|"Wimp_Pr|
|00002090| 6f 63 65 73 73 4b 65 79 | 22 2c 71 25 21 32 34 0d |ocessKey|",q%!24.|
|000020a0| 0b 36 05 cd 0d 0b 40 05 | cd 0d 0b 4a 05 e1 0d 0b |.6....@.|...J....|
|000020b0| 54 04 0d 0b 5e 11 dd f2 | 72 65 63 65 69 76 65 28 |T...^...|receive(|
|000020c0| 71 25 29 0d 0b 68 1d ea | 5a 25 2c 68 25 2c 69 25 |q%)..h..|Z%,h%,i%|
|000020d0| 2c 74 25 2c 66 24 2c 74 | 77 25 2c 61 25 2c 41 24 |,t%,f$,t|w%,a%,A$|
|000020e0| 0d 0b 72 0e c8 8e 20 71 | 25 21 31 36 20 ca 0d 0b |..r... q|%!16 ...|
|000020f0| 7c 11 c9 20 30 3a f2 66 | 69 6e 69 73 68 3a e0 0d ||.. 0:.f|inish:..|
|00002100| 0b 86 33 c9 20 31 3a 71 | 25 21 31 36 3d 32 3a 71 |..3. 1:q|%!16=2:q|
|00002110| 25 21 33 36 3d 2d 31 3a | 24 28 71 25 2b 34 34 29 |%!36=-1:|$(q%+44)|
|00002120| 3d 22 3c 57 69 6d 70 24 | 53 63 72 61 70 3e 22 2b |="<Wimp$|Scrap>"+|
|00002130| bd 30 0d 0b 90 30 20 20 | 71 25 21 31 32 3d 71 25 |.0...0 |q%!12=q%|
|00002140| 21 38 3a c8 99 22 57 69 | 6d 70 5f 53 65 6e 64 4d |!8:.."Wi|mp_SendM|
|00002150| 65 73 73 61 67 65 22 2c | 31 37 2c 71 25 2c 71 25 |essage",|17,q%,q%|
|00002160| 21 34 0d 0b 9a 31 c9 20 | 33 3a 69 25 3d 71 25 21 |!4...1. |3:i%=q%!|
|00002170| 32 34 3a 68 25 3d 71 25 | 21 32 30 3a 74 25 3d 71 |24:h%=q%|!20:t%=q|
|00002180| 25 21 34 30 3a 66 24 3d | a4 73 74 72 28 71 25 2b |%!40:f$=|.str(q%+|
|00002190| 34 34 29 0d 0b a4 2d 20 | 20 71 25 21 31 36 3d 34 |44)...- | q%!16=4|
|000021a0| 3a c8 99 22 57 69 6d 70 | 5f 53 65 6e 64 4d 65 73 |:.."Wimp|_SendMes|
|000021b0| 73 61 67 65 22 2c 31 37 | 2c 71 25 2c 71 25 21 34 |sage",17|,q%,q%!4|
|000021c0| 0d 0b ae 0b 20 20 c8 8e | 68 25 ca 0d 0b b8 1b 20 |.... ..|h%..... |
|000021d0| 20 20 20 c9 63 6f 6e 66 | 69 67 25 3a e7 74 25 3d | .conf|ig%:.t%=|
|000021e0| 26 46 46 46 20 8c 0d 0b | c2 28 20 20 20 20 20 20 |&FFF ...|.( |
|000021f0| 20 20 e7 69 25 3d 34 f2 | 75 70 64 5f 69 63 6f 6e | .i%=4.|upd_icon|
|00002200| 28 63 6f 6e 66 69 67 25 | 2c 34 2c 66 24 29 0d 0b |(config%|,4,f$)..|
|00002210| cc 0d 20 20 20 20 20 20 | 20 20 cc 0d 0b d6 1b 20 |.. | ..... |
|00002220| 20 20 20 20 20 20 20 f2 | 69 6e 69 74 73 63 72 69 | .|initscri|
|00002230| 70 74 28 66 24 29 0d 0b | e0 0b 20 20 20 20 20 20 |pt(f$)..|.. |
|00002240| cd 0d 0b ea 2a 20 20 20 | 20 c9 73 74 61 74 75 73 |....* | .status|
|00002250| 25 3a e7 74 25 3d 26 46 | 46 46 20 8c f2 69 6e 69 |%:.t%=&F|FF ..ini|
|00002260| 74 73 63 72 69 70 74 28 | 66 24 29 0d 0b f4 24 20 |tscript(|f$)...$ |
|00002270| 20 20 20 c9 2d 31 2c 2d | 32 3a e7 74 25 3d 26 46 | .-1,-|2:.t%=&F|
|00002280| 46 46 20 80 69 25 3d 69 | 63 6f 6e 30 25 20 8c 0d |FF .i%=i|con0% ..|
|00002290| 0b fe 19 20 20 20 20 20 | 20 f2 69 6e 69 74 73 63 |... | .initsc|
|000022a0| 72 69 70 74 28 66 24 29 | 0d 0c 08 0b 20 20 20 20 |ript(f$)|.... |
|000022b0| 20 20 cc 0d 0c 12 15 20 | 20 20 20 20 20 e3 5a 25 | ..... | .Z%|
|000022c0| 3d 30 b8 69 6d 61 78 25 | 0d 0c 1c 38 20 20 20 20 |=0.imax%|...8 |
|000022d0| 20 20 20 20 e7 69 25 3d | 69 62 61 72 25 28 5a 25 | .i%=|ibar%(Z%|
|000022e0| 29 80 69 66 69 6c 65 24 | 28 5a 25 29 3e 22 22 8c |).ifile$|(Z%)>"".|
|000022f0| f2 69 66 69 6c 65 28 5a | 25 2c 66 24 2c 74 25 29 |.ifile(Z|%,f$,t%)|
|00002300| 0d 0c 26 0b 20 20 20 20 | 20 20 ed 0d 0c 30 0b 20 |..&. | ...0. |
|00002310| 20 20 20 20 20 cd 0d 0c | 3a 07 20 20 cb 0d 0c 44 | ...|:. ...D|
|00002320| 21 20 20 5a 25 3d a4 64 | 65 6c 66 69 6c 65 28 22 |! Z%=.d|elfile("|
|00002330| 3c 57 69 6d 70 24 53 63 | 72 61 70 3e 22 29 0d 0c |<Wimp$Sc|rap>")..|
|00002340| 4e 2d c9 20 31 31 3a e7 | 64 65 76 69 63 65 25 20 |N-. 11:.|device% |
|00002350| 80 71 25 21 34 3c 3e 74 | 61 73 6b 25 20 8c f2 72 |.q%!4<>t|ask% ..r|
|00002360| 65 66 75 73 65 64 65 76 | 69 63 65 0d 0c 58 17 c9 |efusedev|ice..X..|
|00002370| 20 31 32 3a e7 71 25 21 | 34 3c 3e 74 61 73 6b 25 | 12:.q%!|4<>task%|
|00002380| 20 8c 0d 0c 62 32 20 20 | f2 70 72 69 6e 74 28 22 | ...b2 |.print("|
|00002390| 44 65 76 69 63 65 20 63 | 6c 61 69 6d 20 66 61 69 |Device c|laim fai|
|000023a0| 6c 65 64 22 2c a4 73 74 | 72 28 71 25 2b 32 38 29 |led",.st|r(q%+28)|
|000023b0| 2c 22 22 29 0d 0c 6c 1f | 20 20 f2 66 72 6f 6e 74 |,"")..l.| .front|
|000023c0| 28 73 74 61 74 75 73 25 | 29 3a 64 65 76 69 63 65 |(status%|):device|
|000023d0| 25 3d a3 0d 0c 76 07 20 | 20 cd 0d 0c 80 24 c9 20 |%=...v. | ....$. |
|000023e0| 26 35 30 32 3a 41 24 3d | a4 73 65 6e 64 68 65 6c |&502:A$=|.sendhel|
|000023f0| 70 28 71 25 21 33 32 2c | 71 25 21 33 36 29 0d 0c |p(q%!32,|q%!36)..|
|00002400| 8a 0d 20 20 e7 41 24 3e | 22 22 8c 0d 0c 94 3f 20 |.. .A$>|""....? |
|00002410| 20 20 20 71 25 21 31 36 | 3d 26 35 30 33 3a 71 25 | q%!16|=&503:q%|
|00002420| 21 31 32 3d 71 25 21 38 | 3a 24 28 71 25 2b 32 30 |!12=q%!8|:$(q%+20|
|00002430| 29 3d 41 24 3a 71 25 3f | 28 32 30 2b a9 41 24 29 |)=A$:q%?|(20+.A$)|
|00002440| 3d 30 3a 21 71 25 3d 32 | 35 36 0d 0c 9e 27 20 20 |=0:!q%=2|56...' |
|00002450| 20 20 c8 99 22 57 69 6d | 70 5f 53 65 6e 64 4d 65 | .."Wim|p_SendMe|
|00002460| 73 73 61 67 65 22 2c 31 | 37 2c 71 25 2c 71 25 21 |ssage",1|7,q%,q%!|
|00002470| 34 0d 0c a8 07 20 20 cd | 0d 0c b2 1e c9 20 26 34 |4.... .|..... &4|
|00002480| 30 30 43 32 3a e7 20 74 | 61 73 6b 73 74 61 72 74 |00C2:. t|askstart|
|00002490| 25 3c 3e 30 20 8c 0d 0c | bc 1d 20 20 e7 74 61 73 |%<>0 ...|.. .tas|
|000024a0| 6b 68 25 28 74 61 73 6b | 73 74 61 72 74 25 29 3d |kh%(task|start%)=|
|000024b0| 30 20 8c 0d 0c c6 4c 20 | 20 20 20 74 61 73 6b 68 |0 ....L | taskh|
|000024c0| 25 28 74 61 73 6b 73 74 | 61 72 74 25 29 3d 71 25 |%(taskst|art%)=q%|
|000024d0| 21 34 3a f2 6c 6f 67 28 | a4 6d 73 67 31 28 22 54 |!4:.log(|.msg1("T|
|000024e0| 61 73 6b 53 74 61 72 74 | 32 22 2c 74 61 73 6b 6e |askStart|2",taskn|
|000024f0| 24 28 74 61 73 6b 73 74 | 61 72 74 25 29 29 29 0d |$(taskst|art%))).|
|00002500| 0c d0 07 20 20 cd 0d 0c | da 12 20 20 74 61 73 6b |... ...|.. task|
|00002510| 73 74 61 72 74 25 3d 30 | 0d 0c e4 07 20 20 cd 0d |start%=0|.... ..|
|00002520| 0c ee 1c c9 20 26 34 30 | 30 43 33 3a f4 20 54 61 |.... &40|0C3:. Ta|
|00002530| 73 6b 43 6c 6f 73 65 64 | 6f 77 6e 0d 0c f8 14 20 |skClosed|own.... |
|00002540| 20 e3 6c 25 3d 30 b8 74 | 61 73 6b 6d 61 78 25 0d | .l%=0.t|askmax%.|
|00002550| 0d 02 1a 20 20 20 20 e7 | 74 61 73 6b 68 25 28 6c |... .|taskh%(l|
|00002560| 25 29 3d 71 25 21 34 20 | 8c 0d 0d 0c 3f 20 20 20 |%)=q%!4 |....? |
|00002570| 20 20 20 74 61 73 6b 68 | 25 28 6c 25 29 3d 30 3a | taskh|%(l%)=0:|
|00002580| e7 74 61 73 6b 65 78 24 | 28 6c 25 29 3e 22 22 8c |.taskex$|(l%)>"".|
|00002590| f2 61 64 64 65 76 65 6e | 74 28 74 61 73 6b 65 78 |.addeven|t(taskex|
|000025a0| 24 28 6c 25 29 2c 33 29 | 0d 0d 16 09 20 20 20 20 |$(l%),3)|.... |
|000025b0| cd 0d 0d 20 07 20 20 ed | 0d 0d 2a 10 20 20 f2 73 |... . .|..*. .s|
|000025c0| 6f 72 74 74 61 73 6b 73 | 0d 0d 34 20 c9 20 26 38 |orttasks|..4 . &8|
|000025d0| 30 38 43 31 3a f4 20 54 | 61 73 6b 57 69 6e 64 6f |08C1:. T|askWindo|
|000025e0| 77 5f 4f 75 74 70 75 74 | 0d 0d 3e 1a 20 20 74 77 |w_Output|..>. tw|
|000025f0| 25 3d 30 3a 74 77 6c 65 | 6e 25 3d 71 25 21 32 30 |%=0:twle|n%=q%!20|
|00002600| 2d 31 0d 0d 48 2b 20 20 | c8 95 74 77 68 25 28 74 |-1..H+ |..twh%(t|
|00002610| 77 25 29 3c 3e 71 25 21 | 34 80 74 77 25 3c 74 77 |w%)<>q%!|4.tw%<tw|
|00002620| 6d 61 78 25 3a 74 77 25 | 2b 3d 31 3a ce 0d 0d 52 |max%:tw%|+=1:...R|
|00002630| 14 20 20 e7 74 77 66 25 | 28 74 77 25 29 3d 30 20 |. .twf%|(tw%)=0 |
|00002640| 8c 0d 0d 5c 2b 20 20 20 | 20 e3 5a 25 3d 30 b8 74 |...\+ | .Z%=0.t|
|00002650| 77 6c 65 6e 25 88 34 3a | 74 6d 70 25 21 5a 25 3d |wlen%.4:|tmp%!Z%=|
|00002660| 71 25 21 28 32 34 2b 5a | 25 29 3a ed 0d 0d 66 21 |q%!(24+Z|%):...f!|
|00002670| 20 20 20 20 f2 74 77 5f | 64 61 74 61 28 74 77 25 | .tw_|data(tw%|
|00002680| 2c 74 6d 70 25 2c 74 77 | 6c 65 6e 25 29 0d 0d 70 |,tmp%,tw|len%)..p|
|00002690| 09 20 20 20 20 cc 0d 0d | 7a 2d 20 20 20 20 e3 5a |. ...|z- .Z|
|000026a0| 25 3d 30 b8 74 77 6c 65 | 6e 25 3a d5 23 74 77 66 |%=0.twle|n%:.#twf|
|000026b0| 25 28 74 77 25 29 2c 71 | 25 21 28 32 34 2b 5a 25 |%(tw%),q|%!(24+Z%|
|000026c0| 29 3a ed 0d 0d 84 07 20 | 20 cd 0d 0d 8e 1d c9 20 |):..... | ...... |
|000026d0| 26 38 30 38 43 32 3a f4 | 20 54 61 73 6b 57 69 6e |&808C2:.| TaskWin|
|000026e0| 64 6f 77 5f 45 67 6f 0d | 0d 98 2a 20 20 e7 71 25 |dow_Ego.|..* .q%|
|000026f0| 21 32 30 3e 3d 74 61 73 | 6b 25 80 71 25 21 32 30 |!20>=tas|k%.q%!20|
|00002700| 3c 3d 28 74 61 73 6b 25 | 2b 74 77 6d 61 78 25 29 |<=(task%|+twmax%)|
|00002710| 8c 0d 0d a2 4a 20 20 20 | 20 74 77 68 25 28 71 25 |....J | twh%(q%|
|00002720| 21 32 30 2d 74 61 73 6b | 25 29 3d 71 25 21 34 3a |!20-task|%)=q%!4:|
|00002730| f2 6c 6f 67 28 22 54 61 | 73 6b 20 73 74 61 72 74 |.log("Ta|sk start|
|00002740| 65 64 3a 20 22 2b 74 77 | 6e 61 6d 65 24 28 71 25 |ed: "+tw|name$(q%|
|00002750| 21 32 30 2d 74 61 73 6b | 25 29 29 0d 0d ac 07 20 |!20-task|%)).... |
|00002760| 20 cd 0d 0d b6 2e c9 20 | 26 38 30 38 43 33 3a f4 | ...... |&808C3:.|
|00002770| 20 54 61 73 6b 57 69 6e | 64 6f 77 5f 4d 6f 72 69 | TaskWin|dow_Mori|
|00002780| 6f 2c 20 74 61 73 6b 20 | 66 69 6e 69 73 68 65 64 |o, task |finished|
|00002790| 0d 0d c0 31 20 20 74 77 | 25 3d 30 3a c8 95 71 25 |...1 tw|%=0:..q%|
|000027a0| 21 34 3c 3e 74 77 68 25 | 28 74 77 25 29 80 74 77 |!4<>twh%|(tw%).tw|
|000027b0| 25 3c 74 77 6d 61 78 25 | 3a 74 77 25 2b 3d 31 3a |%<twmax%|:tw%+=1:|
|000027c0| ce 0d 0d ca 16 20 20 e7 | 71 25 21 34 3d 74 77 68 |..... .|q%!4=twh|
|000027d0| 25 28 74 77 25 29 8c 0d | 0d d4 2b 20 20 20 20 f2 |%(tw%)..|..+ .|
|000027e0| 6c 6f 67 28 a4 6d 73 67 | 31 28 22 54 61 73 6b 45 |log(.msg|1("TaskE|
|000027f0| 6e 64 22 2c 74 77 6e 61 | 6d 65 24 28 74 77 25 29 |nd",twna|me$(tw%)|
|00002800| 29 29 0d 0d de 16 20 20 | 20 20 e7 74 77 6b 25 28 |)).... | .twk%(|
|00002810| 74 77 25 29 3d 30 20 8c | 0d 0d e8 28 20 20 20 20 |tw%)=0 .|...( |
|00002820| 20 20 74 77 68 25 28 74 | 77 25 29 3d 30 3a f2 63 | twh%(t|w%)=0:.c|
|00002830| 6c 6f 73 65 77 28 74 77 | 77 25 28 74 77 25 29 29 |losew(tw|w%(tw%))|
|00002840| 0d 0d f2 0b 20 20 20 20 | 20 20 cc 0d 0d fc 3f 20 |.... | ....? |
|00002850| 20 20 20 20 20 74 77 68 | 25 28 74 77 25 29 3d 2d | twh|%(tw%)=-|
|00002860| 31 3a 24 74 77 74 25 28 | 74 77 25 29 3d 74 77 6e |1:$twt%(|tw%)=twn|
|00002870| 61 6d 65 24 28 74 77 25 | 29 2b a4 6d 73 67 30 28 |ame$(tw%|)+.msg0(|
|00002880| 22 54 61 73 6b 46 69 6e | 22 29 0d 0e 06 1d 20 20 |"TaskFin|").... |
|00002890| 20 20 20 20 f2 64 6f 74 | 69 74 6c 65 28 74 77 77 | .dot|itle(tww|
|000028a0| 25 28 74 77 25 29 29 0d | 0e 10 09 20 20 20 20 cd |%(tw%)).|... .|
|000028b0| 0d 0e 1a 32 20 20 20 20 | 74 77 6e 61 6d 65 24 28 |...2 |twname$(|
|000028c0| 74 77 25 29 3d 22 22 3a | f2 63 66 28 74 77 66 25 |tw%)="":|.cf(twf%|
|000028d0| 28 74 77 25 29 29 3a 74 | 77 66 25 28 74 77 25 29 |(tw%)):t|wf%(tw%)|
|000028e0| 3d 30 0d 0e 24 32 20 20 | 20 20 e7 74 77 65 78 69 |=0..$2 | .twexi|
|000028f0| 74 24 28 74 77 25 29 3e | 22 22 8c f2 61 64 64 65 |t$(tw%)>|""..adde|
|00002900| 76 65 6e 74 28 74 77 65 | 78 69 74 24 28 74 77 25 |vent(twe|xit$(tw%|
|00002910| 29 2c 34 29 0d 0e 2e 07 | 20 20 cd 0d 0e 38 05 cb |),4)....| ...8..|
|00002920| 0d 0e 42 05 e1 0d 0e 4c | 04 0d 0e 56 15 dd a4 73 |..B....L|...V...s|
|00002930| 65 6e 64 68 65 6c 70 28 | 77 25 2c 69 25 29 0d 0e |endhelp(|w%,i%)..|
|00002940| 60 0a ea 41 24 2c 6c 25 | 0d 0e 6a 17 41 24 3d 22 |`..A$,l%|..j.A$="|
|00002950| 48 67 65 6e 65 72 69 63 | 22 3a c8 8e 77 25 ca 0d |Hgeneric|":..w%..|
|00002960| 0e 74 16 20 20 c9 74 78 | 74 25 3a 41 24 3d 22 48 |.t. .tx|t%:A$="H|
|00002970| 74 65 78 74 22 0d 0e 7e | 21 20 20 c9 73 74 61 74 |text"..~|! .stat|
|00002980| 75 73 25 3a 41 24 3d 22 | 48 73 74 61 74 75 73 22 |us%:A$="|Hstatus"|
|00002990| 3a c8 8e 69 25 ca 0d 0e | 88 19 20 20 20 20 c9 31 |:..i%...|.. .1|
|000029a0| 2c 32 3a 41 24 3d 22 48 | 61 63 74 69 6f 6e 22 0d |,2:A$="H|action".|
|000029b0| 0e 92 13 20 20 20 20 c9 | 33 3a 41 24 3d 22 48 69 |... .|3:A$="Hi|
|000029c0| 70 22 0d 0e 9c 15 20 20 | 20 20 c9 34 3a 41 24 3d |p".... | .4:A$=|
|000029d0| 22 48 73 74 6f 70 22 0d | 0e a6 16 20 20 20 20 c9 |"Hstop".|... .|
|000029e0| 35 3a 41 24 3d 22 48 70 | 61 75 73 65 22 0d 0e b0 |5:A$="Hp|ause"...|
|000029f0| 18 20 20 20 20 c9 36 2c | 37 3a 41 24 3d 22 48 6d |. .6,|7:A$="Hm|
|00002a00| 65 6e 75 73 22 0d 0e ba | 15 20 20 20 20 c9 38 3a |enus"...|. .8:|
|00002a10| 41 24 3d 22 48 74 69 6d | 65 22 0d 0e c4 18 20 20 |A$="Htim|e".... |
|00002a20| 20 20 c9 31 31 3a 41 24 | 3d 22 48 72 65 64 69 61 | .11:A$|="Hredia|
|00002a30| 6c 22 0d 0e ce 20 20 20 | 20 20 c9 31 30 2c 31 32 |l"... | .10,12|
|00002a40| 2c 31 34 2c 31 35 3a 41 | 24 3d 22 48 6d 6f 64 65 |,14,15:A|$="Hmode|
|00002a50| 6d 22 0d 0e d8 07 20 20 | cb 0d 0e e2 2b 20 20 c9 |m".... |....+ .|
|00002a60| 6d 65 73 73 25 3a 41 24 | 3d 22 48 6d 65 73 73 22 |mess%:A$|="Hmess"|
|00002a70| 3a e7 70 61 75 73 65 25 | 8c 41 24 3d 22 48 6d 65 |:.pause%|.A$="Hme|
|00002a80| 73 73 32 22 0d 0e ec 19 | 20 20 c9 69 6e 70 75 74 |ss2"....| .input|
|00002a90| 25 3a 41 24 3d 22 48 65 | 6e 74 65 72 22 0d 0e f6 |%:A$="He|nter"...|
|00002aa0| 19 20 20 c9 79 65 73 6e | 6f 25 3a 41 24 3d 22 48 |. .yesn|o%:A$="H|
|00002ab0| 79 65 73 6e 6f 22 0d 0f | 00 17 20 20 c9 69 6e 66 |yesno"..|.. .inf|
|00002ac0| 6f 25 3a 41 24 3d 22 48 | 69 6e 66 6f 22 0d 0f 0a |o%:A$="H|info"...|
|00002ad0| 1b 20 20 c9 63 6f 6e 66 | 69 67 25 3a 41 24 3d 22 |. .conf|ig%:A$="|
|00002ae0| 48 63 6f 6e 66 69 67 22 | 0d 0f 14 2c 20 20 7f 3a |Hconfig"|..., .:|
|00002af0| e3 6c 25 3d 30 b8 74 77 | 6d 61 78 25 3a e7 77 25 |.l%=0.tw|max%:.w%|
|00002b00| 3d 74 77 77 25 28 6c 25 | 29 8c 41 24 3d 22 48 74 |=tww%(l%|).A$="Ht|
|00002b10| 61 73 6b 22 0d 0f 1e 09 | 20 20 20 20 ed 0d 0f 28 |ask"....| ...(|
|00002b20| 05 cb 0d 0f 32 0e 3d a4 | 6d 73 67 30 28 41 24 29 |....2.=.|msg0(A$)|
|00002b30| 0d 0f 3c 04 0d 0f 46 0c | dd f2 66 69 6e 69 73 68 |..<...F.|..finish|
|00002b40| 0d 0f 50 07 ea 6c 25 0d | 0f 5a 10 e7 64 65 76 69 |..P..l%.|.Z..devi|
|00002b50| 63 65 25 3c 3e 30 8c 0d | 0f 64 18 20 20 4a 25 3d |ce%<>0..|.d. J%=|
|00002b60| a4 64 28 38 2c 70 6f 72 | 74 25 2c 30 2c 30 29 0d |.d(8,por|t%,0,0).|
|00002b70| 0f 6e 19 20 20 4a 25 3d | a4 64 28 31 38 2c 70 6f |.n. J%=|.d(18,po|
|00002b80| 72 74 25 2c 30 2c 30 29 | 0d 0f 78 05 cd 0d 0f 82 |rt%,0,0)|..x.....|
|00002b90| 10 f2 6f 70 65 6e 6c 6f | 67 28 22 22 29 0d 0f 8c |..openlo|g("")...|
|00002ba0| 17 f2 63 66 28 66 68 31 | 25 29 3a f2 63 66 28 66 |..cf(fh1|%):.cf(f|
|00002bb0| 68 32 25 29 0d 0f 96 20 | e3 6c 25 3d 30 b8 74 77 |h2%)... |.l%=0.tw|
|00002bc0| 6d 61 78 25 3a f2 63 66 | 28 74 77 66 25 28 6c 25 |max%:.cf|(twf%(l%|
|00002bd0| 29 29 3a ed 0d 0f a0 21 | e3 6c 25 3d 30 b8 66 6d |)):....!|.l%=0.fm|
|00002be0| 61 78 25 3a f2 63 66 28 | 66 69 6c 65 68 25 28 6c |ax%:.cf(|fileh%(l|
|00002bf0| 25 29 29 3a ed 0d 0f aa | 10 f2 65 6e 64 6d 73 67 |%)):....|..endmsg|
|00002c00| 74 72 61 6e 73 0d 0f b4 | 05 e1 0d 0f be 04 0d 0f |trans...|........|
|00002c10| c8 0e dd f2 63 66 28 f8 | 20 43 25 29 0d 0f d2 21 |....cf(.| C%)...!|
|00002c20| e7 43 25 3c 3e 30 8c c8 | 99 22 58 4f 53 5f 46 69 |.C%<>0..|."XOS_Fi|
|00002c30| 6e 64 22 2c 30 2c 43 25 | 3a 43 25 3d 30 0d 0f dc |nd",0,C%|:C%=0...|
|00002c40| 05 e1 0d 0f e6 04 0d 0f | f0 10 dd f2 67 65 74 70 |........|....getp|
|00002c50| 6f 69 6e 74 65 72 0d 0f | fa 24 c8 99 22 57 69 6d |ointer..|.$.."Wim|
|00002c60| 70 5f 47 65 74 50 6f 69 | 6e 74 65 72 49 6e 66 6f |p_GetPoi|nterInfo|
|00002c70| 22 2c 2c 62 75 66 66 65 | 72 25 0d 10 04 3e 6d 78 |",,buffe|r%...>mx|
|00002c80| 25 3d 21 62 75 66 66 65 | 72 25 3a 6d 79 25 3d 62 |%=!buffe|r%:my%=b|
|00002c90| 75 66 66 65 72 25 21 34 | 3a 62 25 3d 62 75 66 66 |uffer%!4|:b%=buff|
|00002ca0| 65 72 25 21 38 3a 68 61 | 6e 64 6c 65 25 3d 62 75 |er%!8:ha|ndle%=bu|
|00002cb0| 66 66 65 72 25 21 31 32 | 0d 10 0e 23 69 63 6f 6e |ffer%!12|...#icon|
|00002cc0| 25 3d 62 75 66 66 65 72 | 25 21 31 36 3a 6f 62 25 |%=buffer|%!16:ob%|
|00002cd0| 3d 62 75 66 66 65 72 25 | 21 32 30 0d 10 18 05 e1 |=buffer%|!20.....|
|00002ce0| 0d 10 22 04 0d 10 2c 1d | dd f2 63 6c 69 63 6b 28 |.."...,.|..click(|
|00002cf0| 6d 78 25 2c 6d 79 25 2c | 62 25 2c 77 25 2c 69 25 |mx%,my%,|b%,w%,i%|
|00002d00| 29 0d 10 36 07 ea 5a 25 | 0d 10 40 0a c8 8e 62 25 |)..6..Z%|..@...b%|
|00002d10| 20 ca 0d 10 4a 07 c9 20 | 32 0d 10 54 0c 20 20 c8 | ...J.. |2..T. .|
|00002d20| 8e 77 25 20 ca 0d 10 5e | 18 20 20 20 20 c9 20 2d |.w% ...^|. . -|
|00002d30| 32 3a e7 69 25 3d 69 63 | 6f 6e 30 25 8c 0d 10 68 |2:.i%=ic|on0%...h|
|00002d40| 17 20 20 20 20 20 20 20 | 20 f2 64 65 66 6d 65 6e |. | .defmen|
|00002d50| 75 28 b9 29 0d 10 72 0b | 20 20 20 20 20 20 cc 0d |u(.)..r.| ..|
|00002d60| 10 7c 17 20 20 20 20 20 | 20 20 20 e3 5a 25 3d 30 |.|. | .Z%=0|
|00002d70| b8 69 6d 61 78 25 0d 10 | 86 6b 20 20 20 20 20 20 |.imax%..|.k |
|00002d80| 20 20 20 20 e7 69 25 3d | 69 62 61 72 25 28 5a 25 | .i%=|ibar%(Z%|
|00002d90| 29 80 69 6d 65 6e 75 24 | 28 5a 25 2c 30 29 3e 22 |).imenu$|(Z%,0)>"|
|00002da0| 22 8c f2 64 6f 6d 65 6e | 75 28 31 30 32 2c a4 6d |"..domen|u(102,.m|
|00002db0| 61 6b 65 6d 65 6e 75 28 | 69 6d 65 6e 75 24 28 5a |akemenu(|imenu$(Z|
|00002dc0| 25 2c 30 29 2c 69 6d 65 | 6e 75 24 28 5a 25 2c 31 |%,0),ime|nu$(Z%,1|
|00002dd0| 29 29 2c 69 62 61 72 69 | 64 24 28 5a 25 29 2c b9 |)),ibari|d$(Z%),.|
|00002de0| 29 0d 10 90 0d 20 20 20 | 20 20 20 20 20 ed 0d 10 |).... | ...|
|00002df0| 9a 0b 20 20 20 20 20 20 | cd 0d 10 a4 2a 20 20 20 |.. |....* |
|00002e00| 20 c9 20 74 78 74 25 3a | c8 99 22 4f 53 5f 42 79 | . txt%:|.."OS_By|
|00002e10| 74 65 22 2c 31 32 31 2c | 28 31 82 26 38 30 29 b8 |te",121,|(1.&80).|
|00002e20| 2c 5a 25 0d 10 ae 10 20 | 20 20 20 20 20 e7 5a 25 |,Z%.... | .Z%|
|00002e30| 3d 30 8c 0d 10 b8 60 20 | 20 20 20 20 20 20 20 f2 |=0....` | .|
|00002e40| 64 6f 6d 65 6e 75 28 31 | 30 33 2c 22 41 6c 61 72 |domenu(1|03,"Alar|
|00002e50| 6d 20 6c 69 73 74 2c 4d | 65 6e 75 20 6c 69 73 74 |m list,M|enu list|
|00002e60| 2c 56 61 72 20 6c 69 73 | 74 2c 54 61 73 6b 20 6c |,Var lis|t,Task l|
|00002e70| 69 73 74 2c 7c 53 63 72 | 69 70 74 20 6c 69 73 74 |ist,|Scr|ipt list|
|00002e80| 2c 51 75 69 74 22 2c 22 | 43 6f 6e 74 72 6f 6c 22 |,Quit","|Control"|
|00002e90| 2c 30 29 0d 10 c2 0d 20 | 20 20 20 20 20 20 20 cc |,0).... | .|
|00002ea0| 0d 10 cc 48 20 20 20 20 | 20 20 20 20 f2 64 6f 6d |...H | .dom|
|00002eb0| 65 6e 75 28 31 30 34 2c | 22 44 62 67 4c 65 76 20 |enu(104,|"DbgLev |
|00002ec0| 30 2c 44 62 67 4c 65 76 | 20 31 2c 44 62 67 4c 65 |0,DbgLev| 1,DbgLe|
|00002ed0| 76 20 32 2c 44 62 67 4c | 65 76 20 33 22 2c 22 44 |v 2,DbgL|ev 3","D|
|00002ee0| 65 62 75 67 22 2c 30 29 | 0d 10 d6 0b 20 20 20 20 |ebug",0)|.... |
|00002ef0| 20 20 cd 0d 10 e0 11 20 | 20 20 20 c9 20 73 74 61 | ..... | . sta|
|00002f00| 74 75 73 25 0d 10 ea 10 | 20 20 20 20 20 20 c8 8e |tus%....| ..|
|00002f10| 69 25 20 ca 0d 10 f4 5f | 20 20 20 20 20 20 20 20 |i% ...._| |
|00002f20| c9 37 3a e7 75 73 65 72 | 6d 65 6e 75 24 28 30 29 |.7:.user|menu$(0)|
|00002f30| 3e 22 22 8c f2 64 6f 6d | 65 6e 75 28 31 30 32 2c |>""..dom|enu(102,|
|00002f40| a4 6d 61 6b 65 6d 65 6e | 75 28 75 73 65 72 6d 65 |.makemen|u(userme|
|00002f50| 6e 75 24 28 30 29 2c 75 | 73 65 72 6d 65 6e 75 24 |nu$(0),u|sermenu$|
|00002f60| 28 31 29 29 2c 22 55 73 | 65 72 20 6d 65 6e 75 22 |(1)),"Us|er menu"|
|00002f70| 2c a3 29 0d 10 fe 19 20 | 20 20 20 20 20 20 20 7f |,.).... | .|
|00002f80| 3a f2 64 65 66 6d 65 6e | 75 28 30 29 0d 11 08 0b |:.defmen|u(0)....|
|00002f90| 20 20 20 20 20 20 cb 0d | 11 12 15 20 20 20 20 7f | ..|... .|
|00002fa0| 3a f2 64 65 66 6d 65 6e | 75 28 30 29 0d 11 1c 07 |:.defmen|u(0)....|
|00002fb0| 20 20 cb 0d 11 26 09 c9 | 31 2c 34 3a 0d 11 30 0d | ...&..|1,4:..0.|
|00002fc0| 20 20 c8 8e 20 77 25 20 | ca 0d 11 3a 27 20 20 20 | .. w% |...:' |
|00002fd0| 20 c9 73 79 73 6d 73 67 | 25 3a e7 69 25 3d 32 8c | .sysmsg|%:.i%=2.|
|00002fe0| f2 63 6c 6f 73 65 77 28 | 73 79 73 6d 73 67 25 29 |.closew(|sysmsg%)|
|00002ff0| 0d 11 44 12 20 20 20 20 | c9 20 73 74 61 74 75 73 |..D. |. status|
|00003000| 25 3a 0d 11 4e 10 20 20 | 20 20 20 20 c8 8e 69 25 |%:..N. | ..i%|
|00003010| 20 ca 0d 11 58 0f 20 20 | 20 20 20 20 20 20 c9 35 | ...X. | .5|
|00003020| 3a 0d 11 62 16 20 20 20 | 20 20 20 20 20 e7 ac 70 |:..b. | ..p|
|00003030| 61 75 73 65 25 20 8c 0d | 11 6c 2b 20 20 20 20 20 |ause% ..|.l+ |
|00003040| 20 20 20 20 20 f2 70 72 | 69 6e 74 28 22 22 2c a4 | .pr|int("",.|
|00003050| 6d 73 67 30 28 22 50 61 | 75 73 65 50 22 29 2c 22 |msg0("Pa|useP"),"|
|00003060| 22 29 0d 11 76 2b 20 20 | 20 20 20 20 20 20 20 20 |")..v+ | |
|00003070| 70 61 75 73 65 25 3d b9 | 3a f2 61 64 64 65 76 65 |pause%=.|:.addeve|
|00003080| 6e 74 28 22 70 61 75 73 | 65 22 2c 30 29 0d 11 80 |nt("paus|e",0)...|
|00003090| 0f 20 20 20 20 20 20 20 | 20 20 20 cc 0d 11 8a 16 |. | .....|
|000030a0| 20 20 20 20 20 20 20 20 | 20 20 f2 75 6e 70 61 75 | | .unpau|
|000030b0| 73 65 0d 11 94 0d 20 20 | 20 20 20 20 20 20 cd 0d |se.... | ..|
|000030c0| 11 9e 42 20 20 20 20 20 | 20 20 20 c9 34 3a e7 73 |..B | .4:.s|
|000030d0| 74 6f 70 25 3d 30 8c 73 | 74 6f 70 25 3d b9 3a f2 |top%=0.s|top%=.:.|
|000030e0| 70 72 69 6e 74 28 22 22 | 2c a4 6d 73 67 30 28 22 |print(""|,.msg0("|
|000030f0| 53 74 6f 70 50 22 29 2c | 22 22 29 3a f2 73 74 6f |StopP"),|""):.sto|
|00003100| 70 0d 11 a8 15 20 20 20 | 20 20 20 20 20 c9 36 3a |p.... | .6:|
|00003110| e7 72 75 6e 25 8c 0d 11 | b2 60 20 20 20 20 20 20 |.run%...|.` |
|00003120| 20 20 20 20 20 20 e7 75 | 73 65 72 6d 65 6e 75 24 | .u|sermenu$|
|00003130| 28 30 29 3e 22 22 8c f2 | 64 6f 6d 65 6e 75 28 31 |(0)>""..|domenu(1|
|00003140| 30 32 2c a4 6d 61 6b 65 | 6d 65 6e 75 28 75 73 65 |02,.make|menu(use|
|00003150| 72 6d 65 6e 75 24 28 30 | 29 2c 75 73 65 72 6d 65 |rmenu$(0|),userme|
|00003160| 6e 75 24 28 31 29 29 2c | 22 55 73 65 72 20 6d 65 |nu$(1)),|"User me|
|00003170| 6e 75 22 2c a3 29 0d 11 | bc 11 20 20 20 20 20 20 |nu",.)..|.. |
|00003180| 20 20 20 20 20 20 cc 0d | 11 c6 20 20 20 20 20 20 | ..|.. |
|00003190| 20 20 20 20 20 20 20 f2 | 73 63 72 69 70 74 6d 65 | .|scriptme|
|000031a0| 6e 75 28 31 30 36 29 0d | 11 d0 0f 20 20 20 20 20 |nu(106).|... |
|000031b0| 20 20 20 20 20 cd 0d 11 | da 43 20 20 20 20 20 20 | ...|.C |
|000031c0| 20 20 c9 31 31 3a e7 64 | 69 61 6c 6c 69 6e 67 25 | .11:.d|ialling%|
|000031d0| 8c 72 65 64 69 61 6c 25 | 3d b9 3a f2 70 72 69 6e |.redial%|=.:.prin|
|000031e0| 74 28 22 22 2c a4 6d 73 | 67 30 28 22 52 65 64 69 |t("",.ms|g0("Redi|
|000031f0| 61 6c 50 22 29 2c 22 22 | 29 0d 11 e4 0b 20 20 20 |alP"),""|).... |
|00003200| 20 20 20 cb 0d 11 ee 12 | 20 20 20 20 c9 20 63 6f | .....| . co|
|00003210| 6e 66 69 67 25 3a 0d 11 | f8 34 20 20 20 20 20 20 |nfig%:..|.4 |
|00003220| e7 20 69 25 3d 36 20 8c | f2 73 61 76 65 63 6f 6e |. i%=6 .|.savecon|
|00003230| 66 69 67 3a e7 62 25 3d | 34 8c f2 63 6c 6f 73 65 |fig:.b%=|4..close|
|00003240| 77 28 63 6f 6e 66 69 67 | 25 29 0d 12 02 23 20 20 |w(config|%)...# |
|00003250| 20 20 20 20 e7 20 69 25 | 3d 31 35 20 8c f2 73 63 | . i%|=15 ..sc|
|00003260| 72 69 70 74 6d 65 6e 75 | 28 31 30 35 29 0d 12 0c |riptmenu|(105)...|
|00003270| 11 20 20 20 20 c9 20 79 | 65 73 6e 6f 25 3a 0d 12 |. . y|esno%:..|
|00003280| 16 1d 20 20 20 20 20 20 | e7 20 69 25 3d 30 20 8c |.. |. i%=0 .|
|00003290| 79 65 73 6e 6f 61 6e 73 | 25 3d 32 0d 12 20 1d 20 |yesnoans|%=2.. . |
|000032a0| 20 20 20 20 20 e7 20 69 | 25 3d 31 20 8c 79 65 73 | . i|%=1 .yes|
|000032b0| 6e 6f 61 6e 73 25 3d 31 | 0d 12 2a 0f 20 20 20 20 |noans%=1|..*. |
|000032c0| c9 20 74 78 74 25 3a 0d | 12 34 44 20 20 20 20 20 |. txt%:.|.4D |
|000032d0| 20 c8 99 22 57 69 6d 70 | 5f 53 65 74 43 61 72 65 | .."Wimp|_SetCare|
|000032e0| 74 50 6f 73 69 74 69 6f | 6e 22 2c 77 25 2c 69 6e |tPositio|n",w%,in|
|000032f0| 69 63 25 2c 2c 2c 2d 31 | 2c a9 a4 69 63 5f 73 74 |ic%,,,-1|,..ic_st|
|00003300| 72 28 77 25 2c 69 6e 69 | 63 25 29 0d 12 3e 0d 20 |r(w%,ini|c%)..>. |
|00003310| 20 20 20 c9 20 2d 32 3a | 0d 12 48 15 20 20 20 20 | . -2:|..H. |
|00003320| 20 20 e7 69 25 3d 69 63 | 6f 6e 30 25 8c 0d 12 52 | .i%=ic|on0%...R|
|00003330| 2e 20 20 20 20 20 20 20 | 20 e7 62 25 3d 34 8c f2 |. | .b%=4..|
|00003340| 66 72 6f 6e 74 28 73 74 | 61 74 75 73 25 29 8b f2 |front(st|atus%)..|
|00003350| 66 72 6f 6e 74 28 74 78 | 74 25 29 0d 12 5c 0b 20 |front(tx|t%)..\. |
|00003360| 20 20 20 20 20 cc 0d 12 | 66 17 20 20 20 20 20 20 | ...|f. |
|00003370| 20 20 e3 5a 25 3d 30 b8 | 69 6d 61 78 25 0d 12 70 | .Z%=0.|imax%..p|
|00003380| 3f 20 20 20 20 20 20 20 | 20 20 20 e7 69 25 3d 69 |? | .i%=i|
|00003390| 62 61 72 25 28 5a 25 29 | 80 69 62 61 72 24 28 5a |bar%(Z%)|.ibar$(Z|
|000033a0| 25 29 3e 22 22 8c f2 61 | 64 64 65 76 65 6e 74 28 |%)>""..a|ddevent(|
|000033b0| 69 62 61 72 24 28 5a 25 | 29 2c 36 29 0d 12 7a 0d |ibar$(Z%|),6)..z.|
|000033c0| 20 20 20 20 20 20 20 20 | ed 0d 12 84 0b 20 20 20 | |..... |
|000033d0| 20 20 20 cd 0d 12 8e 07 | 20 20 cb 0d 12 98 05 cb | .....| ......|
|000033e0| 0d 12 a2 05 e1 0d 12 ac | 04 0d 12 b6 11 dd f2 64 |........|.......d|
|000033f0| 65 66 6d 65 6e 75 28 69 | 25 29 0d 12 c0 42 f2 64 |efmenu(i|%)...B.d|
|00003400| 6f 6d 65 6e 75 28 31 30 | 31 2c 22 3e 49 6e 66 6f |omenu(10|1,">Info|
|00003410| 2c 43 68 6f 69 63 65 73 | 2e 2e 2e 2c 7c 43 6f 6e |,Choices|...,|Con|
|00003420| 74 72 6f 6c 2e 2e 2e 2c | 51 75 69 74 22 2c 22 53 |trol...,|Quit","S|
|00003430| 4c 49 50 64 69 61 6c 22 | 2c 69 25 29 0d 12 ca 05 |LIPdial"|,i%)....|
|00003440| e1 0d 12 d4 04 0d 12 de | 15 dd f2 73 63 72 69 70 |........|...scrip|
|00003450| 74 6d 65 6e 75 28 6d 68 | 25 29 0d 12 e8 44 ea 64 |tmenu(mh|%)...D.d|
|00003460| 24 2c 6d 24 2c 64 69 72 | 62 75 66 25 2c 64 62 72 |$,m$,dir|buf%,dbr|
|00003470| 25 2c 64 62 73 69 7a 65 | 25 2c 72 33 25 2c 6e 25 |%,dbsize|%,r3%,n%|
|00003480| 2c 6e 72 65 61 64 25 2c | 66 6c 6f 6f 70 25 2c 61 |,nread%,|floop%,a|
|00003490| 64 64 72 25 2c 74 25 2c | 6f 25 2c 66 32 25 0d 12 |ddr%,t%,|o%,f2%..|
|000034a0| f2 09 f2 68 67 6f 6e 0d | 12 fc 2c 64 62 73 69 7a |...hgon.|..,dbsiz|
|000034b0| 65 25 3d 31 30 32 34 3a | 64 24 3d 22 3c 53 6c 69 |e%=1024:|d$="<Sli|
|000034c0| 70 64 69 61 6c 24 64 69 | 72 3e 2e 73 63 72 69 70 |pdial$di|r>.scrip|
|000034d0| 74 73 22 0d 13 06 2a 64 | 62 72 25 3d a4 63 6c 61 |ts"...*d|br%=.cla|
|000034e0| 69 6d 6d 65 6d 28 64 69 | 72 62 75 66 25 2c 64 62 |immem(di|rbuf%,db|
|000034f0| 73 69 7a 65 25 2c 22 64 | 62 75 66 22 29 0d 13 10 |size%,"d|buf")...|
|00003500| 05 f5 0d 13 1a 47 c8 99 | 22 58 4f 53 5f 47 42 50 |.....G..|"XOS_GBP|
|00003510| 42 22 2c 31 32 2c 64 24 | 2c 64 69 72 62 75 66 25 |B",12,d$|,dirbuf%|
|00003520| 2c 31 30 2c 6e 25 2c 64 | 62 73 69 7a 65 25 2c 22 |,10,n%,d|bsize%,"|
|00003530| 2a 22 b8 2c 2c 2c 72 33 | 25 2c 6e 25 3b 46 25 3a |*".,,,r3|%,n%;F%:|
|00003540| 6e 72 65 61 64 25 3d 6e | 25 0d 13 24 11 61 64 64 |nread%=n|%..$.add|
|00003550| 72 25 3d 64 69 72 62 75 | 66 25 0d 13 2e 14 e7 72 |r%=dirbu|f%.....r|
|00003560| 33 25 3e 30 80 28 46 25 | 80 31 29 3d 30 8c 0d 13 |3%>0.(F%|.1)=0...|
|00003570| 38 13 20 20 e3 66 6c 6f | 6f 70 25 3d 31 b8 72 33 |8. .flo|op%=1.r3|
|00003580| 25 0d 13 42 49 20 20 20 | 20 6f 25 3d 61 64 64 72 |%..BI | o%=addr|
|00003590| 25 21 31 36 3a 74 25 3d | 61 64 64 72 25 21 32 30 |%!16:t%=|addr%!20|
|000035a0| 3a 66 24 3d a4 73 74 72 | 28 61 64 64 72 25 2b 32 |:f$=.str|(addr%+2|
|000035b0| 34 29 3a 61 64 64 72 25 | 3d 61 64 64 72 25 2b 28 |4):addr%|=addr%+(|
|000035c0| 32 38 2b a9 66 24 29 80 | ac 33 0d 13 4c 1f 20 20 |28+.f$).|.3..L. |
|000035d0| 20 20 e7 6f 25 3d 31 80 | 74 25 3d 26 46 46 46 20 | .o%=1.|t%=&FFF |
|000035e0| 80 a9 6d 24 3c 32 33 30 | 8c 0d 13 56 3f 20 20 20 |..m$<230|...V? |
|000035f0| 20 20 20 61 24 3d 22 22 | 3a 66 32 25 3d a4 6f 70 | a$=""|:f2%=.op|
|00003600| 65 6e 69 6e 28 64 24 2b | 22 2e 22 2b 66 24 29 3a |enin(d$+|"."+f$):|
|00003610| e7 66 32 25 3e 30 8c 61 | 24 3d be 23 66 32 25 3a |.f2%>0.a|$=.#f2%:|
|00003620| f2 63 66 28 66 32 25 29 | 0d 13 60 24 20 20 20 20 |.cf(f2%)|..`$ |
|00003630| 20 20 e7 c0 61 24 2c 35 | 29 3d 22 23 73 6c 69 70 | ..a$,5|)="#slip|
|00003640| 22 8c 6d 24 2b 3d 66 24 | 2b 22 2c 22 0d 13 6a 09 |".m$+=f$|+","..j.|
|00003650| 20 20 20 20 cd 0d 13 74 | 0d 20 20 ed 66 6c 6f 6f | ...t|. .floo|
|00003660| 70 25 0d 13 7e 05 cd 0d | 13 88 18 fd 6e 72 65 61 |p%..~...|....nrea|
|00003670| 64 25 3d 2d 31 84 28 46 | 25 80 31 29 3c 3e 30 0d |d%=-1.(F|%.1)<>0.|
|00003680| 13 92 15 f2 72 65 6c 65 | 61 73 65 6d 65 6d 28 64 |....rele|asemem(d|
|00003690| 62 72 25 29 0d 13 9c 15 | e7 c2 6d 24 29 3d 22 2c |br%)....|..m$)=",|
|000036a0| 22 8c 6d 24 3d c0 6d 24 | 29 0d 13 a6 0a f2 68 67 |".m$=.m$|).....hg|
|000036b0| 6f 66 66 0d 13 b0 26 e7 | 6d 24 3e 22 22 8c f2 64 |off...&.|m$>""..d|
|000036c0| 6f 6d 65 6e 75 28 6d 68 | 25 2c 6d 24 2c 22 53 63 |omenu(mh|%,m$,"Sc|
|000036d0| 72 69 70 74 73 22 2c 30 | 29 0d 13 ba 05 e1 0d 13 |ripts",0|).......|
|000036e0| c4 04 0d 13 ce 11 dd f2 | 68 61 6c 74 28 6d 65 73 |........|halt(mes|
|000036f0| 73 24 29 0d 13 d8 35 63 | 61 6c 6c 5f 6c 65 76 25 |s$)...5c|all_lev%|
|00003700| 3d 30 3a 63 61 6c 6c 5f | 6c 6f 63 6b 25 28 29 3d |=0:call_|lock%()=|
|00003710| 30 3a 65 76 65 6e 74 24 | 28 29 3d 22 22 3a 65 76 |0:event$|()="":ev|
|00003720| 65 6e 74 25 28 29 3d b9 | 0d 13 e2 2e e7 65 72 72 |ent%()=.|.....err|
|00003730| 6f 72 24 3e 22 22 8c f2 | 61 64 64 65 76 65 6e 74 |or$>""..|addevent|
|00003740| 28 65 72 72 6f 72 24 2c | 30 29 3a 65 72 72 6f 72 |(error$,|0):error|
|00003750| 24 3d 22 22 3a e1 0d 13 | ec 39 f2 6d 65 73 73 61 |$="":...|.9.messa|
|00003760| 67 65 28 22 22 22 22 2b | a4 6d 73 67 32 28 22 45 |ge(""""+|.msg2("E|
|00003770| 73 63 72 69 70 74 22 2c | c3 73 74 61 67 65 25 2c |script",|.stage%,|
|00003780| 6d 65 73 73 24 29 2b 22 | 22 22 22 29 3a ef 37 0d |mess$)+"|"""):.7.|
|00003790| 13 f6 20 f2 70 72 69 6e | 74 28 22 22 2c a4 6d 73 |.. .prin|t("",.ms|
|000037a0| 67 30 28 22 53 74 6f 70 | 45 22 29 2c 22 22 29 0d |g0("Stop|E"),"").|
|000037b0| 14 00 1b 73 74 61 67 65 | 25 3d 30 3a 72 75 6e 25 |...stage|%=0:run%|
|000037c0| 3d a3 3a f2 70 61 75 73 | 65 64 0d 14 0a 05 e1 0d |=.:.paus|ed......|
|000037d0| 14 14 04 0d 14 1e 0f dd | f2 69 6e 70 75 74 28 41 |........|.input(A|
|000037e0| 24 29 0d 14 28 30 ea 76 | 24 2c 70 24 2c 69 24 3a |$)..(0.v|$,p$,i$:|
|000037f0| 70 24 3d 22 49 6e 70 75 | 74 3a 22 3a 69 24 3d 22 |p$="Inpu|t:":i$="|
|00003800| 50 70 74 72 5f 77 72 69 | 74 65 3b 52 32 3b 4b 74 |Pptr_wri|te;R2;Kt|
|00003810| 61 22 0d 14 32 1c f5 42 | 24 3d a4 70 61 72 61 6d |a"..2..B|$=.param|
|00003820| 28 41 24 29 3a 69 6e 70 | 75 74 24 3d 22 22 0d 14 |(A$):inp|ut$=""..|
|00003830| 3c 10 e7 c0 42 24 2c 31 | 29 3d 22 2f 22 8c 0d 14 |<...B$,1|)="/"...|
|00003840| 46 1b 43 24 3d a4 76 61 | 6c 75 65 28 42 24 29 3a |F.C$=.va|lue(B$):|
|00003850| c8 8e c0 42 24 2c 32 29 | ca 0d 14 50 16 20 20 c9 |...B$,2)|...P. .|
|00003860| 22 70 72 22 3a 70 24 3d | c0 43 24 2c 34 30 29 0d |"pr":p$=|.C$,40).|
|00003870| 14 5a 17 20 20 c9 22 68 | 69 22 3a 69 24 3d 22 44 |.Z. ."h|i":i$="D|
|00003880| 2a 3b 22 2b 69 24 0d 14 | 64 07 20 20 cb 0d 14 6e |*;"+i$..|d. ...n|
|00003890| 05 cc 0d 14 78 38 20 20 | 76 24 3d 42 24 3a f2 75 |....x8 |v$=B$:.u|
|000038a0| 70 64 5f 69 63 6f 6e 28 | 69 6e 70 75 74 25 2c 31 |pd_icon(|input%,1|
|000038b0| 2c 22 22 29 3a f2 75 70 | 64 5f 69 6e 64 28 69 6e |,""):.up|d_ind(in|
|000038c0| 70 75 74 25 2c 31 2c 69 | 24 29 0d 14 82 1c 20 20 |put%,1,i|$).... |
|000038d0| f2 75 70 64 5f 69 63 6f | 6e 28 69 6e 70 75 74 25 |.upd_ico|n(input%|
|000038e0| 2c 30 2c 70 24 29 0d 14 | 8c 3e 20 20 f2 66 72 6f |,0,p$)..|.> .fro|
|000038f0| 6e 74 28 69 6e 70 75 74 | 25 29 3a c8 99 22 57 69 |nt(input|%):.."Wi|
|00003900| 6d 70 5f 53 65 74 43 61 | 72 65 74 50 6f 73 69 74 |mp_SetCa|retPosit|
|00003910| 69 6f 6e 22 2c 69 6e 70 | 75 74 25 2c 31 2c 2c 2c |ion",inp|ut%,1,,,|
|00003920| 2d 31 2c 30 0d 14 96 27 | 20 20 f5 f2 70 6f 6c 6c |-1,0...'| ..poll|
|00003930| 28 35 30 29 3a fd 69 6e | 70 75 74 24 3e 22 22 3a |(50):.in|put$>"":|
|00003940| 70 24 3d 22 49 6e 70 75 | 74 3a 22 0d 14 a0 1b 20 |p$="Inpu|t:".... |
|00003950| 20 e7 69 6e 70 75 74 24 | 3d 22 20 22 8c 69 6e 70 | .input$|=" ".inp|
|00003960| 75 74 24 3d 22 22 0d 14 | aa 16 20 20 f2 73 65 74 |ut$=""..|.. .set|
|00003970| 76 28 76 24 2c 69 6e 70 | 75 74 24 29 0d 14 b4 05 |v(v$,inp|ut$)....|
|00003980| cd 0d 14 be 0a fd 41 24 | 3d 22 22 0d 14 c8 13 f2 |......A$|="".....|
|00003990| 63 6c 6f 73 65 77 28 69 | 6e 70 75 74 25 29 0d 14 |closew(i|nput%)..|
|000039a0| d2 05 e1 0d 14 dc 04 0d | 14 e6 11 dd f2 6d 65 73 |........|.....mes|
|000039b0| 73 61 67 65 28 41 24 29 | 0d 14 f0 0d ea 77 25 2c |sage(A$)|.....w%,|
|000039c0| 6e 25 2c 74 24 0d 14 fa | 1f 74 24 3d a4 6d 73 67 |n%,t$...|.t$=.msg|
|000039d0| 30 28 22 4d 65 73 73 61 | 67 65 22 29 3a 6d 73 67 |0("Messa|ge"):msg|
|000039e0| 63 25 3d a3 0d 15 04 0d | 77 25 3d 30 3a 6e 25 3d |c%=.....|w%=0:n%=|
|000039f0| 30 0d 15 0e 12 f5 42 24 | 3d a4 70 61 72 61 6d 28 |0.....B$|=.param(|
|00003a00| 41 24 29 0d 15 18 10 e7 | c0 42 24 2c 31 29 3d 22 |A$).....|.B$,1)="|
|00003a10| 2f 22 8c 0d 15 22 1b 43 | 24 3d a4 76 61 6c 75 65 |/"...".C|$=.value|
|00003a20| 28 42 24 29 3a c8 8e c0 | 42 24 2c 32 29 ca 0d 15 |(B$):...|B$,2)...|
|00003a30| 2c 1a 20 20 c9 22 63 6c | 22 3a f2 63 6c 6f 73 65 |,. ."cl|":.close|
|00003a40| 77 28 6d 65 73 73 25 29 | 0d 15 36 10 20 20 c9 22 |w(mess%)|..6. ."|
|00003a50| 77 61 22 3a 77 25 3d b9 | 0d 15 40 11 20 20 c9 22 |wa":w%=.|..@. ."|
|00003a60| 74 69 22 3a 74 24 3d 43 | 24 0d 15 4a 21 20 20 c9 |ti":t$=C|$..J! .|
|00003a70| 22 63 61 22 3a 6d 73 67 | 5f 63 73 24 3d 43 24 3a |"ca":msg|_cs$=C$:|
|00003a80| 6d 73 67 5f 63 65 24 3d | 22 22 0d 15 54 41 20 20 |msg_ce$=|""..TA |
|00003a90| 20 20 20 20 20 20 6d 73 | 67 5f 63 6d 25 3d 6d 73 | ms|g_cm%=ms|
|00003aa0| 67 6d 61 78 25 3a 6d 73 | 67 5f 63 73 25 3d 31 3a |gmax%:ms|g_cs%=1:|
|00003ab0| 6d 73 67 74 25 3d 74 69 | 6d 65 25 3a e7 6e 25 3d |msgt%=ti|me%:.n%=|
|00003ac0| 30 8c 6d 73 67 24 28 29 | 3d 22 22 0d 15 5e 13 20 |0.msg$()|=""..^. |
|00003ad0| 20 c9 22 63 65 22 3a 6d | 73 67 63 25 3d b9 0d 15 | ."ce":m|sgc%=...|
|00003ae0| 68 16 20 20 c9 22 65 6e | 22 3a 6d 73 67 5f 63 65 |h. ."en|":msg_ce|
|00003af0| 24 3d 43 24 0d 15 72 17 | 20 20 c9 22 6d 61 22 3a |$=C$..r.| ."ma":|
|00003b00| 6d 73 67 5f 63 6d 25 3d | bb 43 24 0d 15 7c 11 20 |msg_cm%=|.C$..|. |
|00003b10| 20 c9 22 61 64 22 3a 6e | 25 2b 3d 31 0d 15 86 11 | ."ad":n|%+=1....|
|00003b20| 20 20 c9 22 6e 61 22 2c | 22 69 64 22 3a 0d 15 90 | ."na",|"id":...|
|00003b30| 07 20 20 cb 0d 15 9a 05 | cc 0d 15 a4 1b 20 20 e7 |. .....|..... .|
|00003b40| 42 24 3e 22 22 80 6e 25 | 3d 30 8c 6d 73 67 24 28 |B$>"".n%|=0.msg$(|
|00003b50| 29 3d 22 22 0d 15 ae 22 | 20 20 e7 42 24 3e 22 22 |)=""..."| .B$>""|
|00003b60| 8c f2 61 64 64 6d 65 73 | 73 61 67 65 28 42 24 29 |..addmes|sage(B$)|
|00003b70| 3a 6e 25 2b 3d 31 0d 15 | b8 05 cd 0d 15 c2 15 fd |:n%+=1..|........|
|00003b80| 42 24 3d 22 22 84 6e 25 | 3e 6d 73 67 6d 61 78 25 |B$="".n%|>msgmax%|
|00003b90| 0d 15 cc 1f 24 6d 73 67 | 74 74 6c 25 3d 74 24 3a |....$msg|ttl%=t$:|
|00003ba0| f2 64 6f 74 69 74 6c 65 | 28 6d 65 73 73 25 29 0d |.dotitle|(mess%).|
|00003bb0| 15 d6 0a e7 6e 25 3e 30 | 8c 0d 15 e0 13 f2 61 64 |....n%>0|......ad|
|00003bc0| 64 6d 65 73 73 61 67 65 | 28 22 22 29 0d 15 ea 05 |dmessage|("")....|
|00003bd0| cd 0d 15 f4 27 e7 77 25 | 8c f2 61 64 64 65 76 65 |....'.w%|..addeve|
|00003be0| 6e 74 28 22 70 61 75 73 | 65 22 2c 30 29 3a 6d 73 |nt("paus|e",0):ms|
|00003bf0| 67 77 61 69 74 25 3d b9 | 0d 15 fe 05 e1 0d 16 08 |gwait%=.|........|
|00003c00| 04 0d 16 12 14 dd f2 61 | 64 64 6d 65 73 73 61 67 |.......a|ddmessag|
|00003c10| 65 28 41 24 29 0d 16 1c | 18 ea 6c 25 2c 77 25 2c |e(A$)...|..l%,w%,|
|00003c20| 74 24 3a 6c 25 3d 2d 31 | 3a 77 25 3d 30 0d 16 26 |t$:l%=-1|:w%=0..&|
|00003c30| 25 f5 6c 25 2b 3d 31 3a | 74 24 3d 6d 73 67 24 28 |%.l%+=1:|t$=msg$(|
|00003c40| 6c 25 29 3a e7 a9 74 24 | 3e 77 25 8c 77 25 3d a9 |l%):..t$|>w%.w%=.|
|00003c50| 74 24 0d 16 30 21 fd 74 | 24 3d 22 22 84 6c 25 3d |t$..0!.t|$="".l%=|
|00003c60| 6d 73 67 6d 61 78 25 3a | 6d 73 67 74 25 3d 74 69 |msgmax%:|msgt%=ti|
|00003c70| 6d 65 25 0d 16 3a 0b e7 | 41 24 3e 22 22 8c 0d 16 |me%..:..|A$>""...|
|00003c80| 44 46 20 20 e7 6c 25 3d | 6d 73 67 6d 61 78 25 80 |DF .l%=|msgmax%.|
|00003c90| 74 24 3e 22 22 8c e3 6c | 25 3d 31 b8 6d 73 67 6d |t$>""..l|%=1.msgm|
|00003ca0| 61 78 25 3a 6d 73 67 24 | 28 6c 25 2d 31 29 3d 6d |ax%:msg$|(l%-1)=m|
|00003cb0| 73 67 24 28 6c 25 29 3a | ed 3a 6c 25 3d 6d 73 67 |sg$(l%):|.:l%=msg|
|00003cc0| 6d 61 78 25 0d 16 4e 11 | 20 20 6d 73 67 24 28 6c |max%..N.| msg$(l|
|00003cd0| 25 29 3d 41 24 0d 16 58 | 07 20 20 cc 0d 16 62 1c |%)=A$..X|. ...b.|
|00003ce0| 20 20 e7 6c 25 3e 30 8c | f2 6f 70 65 6e 6d 65 73 | .l%>0.|.openmes|
|00003cf0| 73 28 6c 25 2c 77 25 29 | 0d 16 6c 05 cd 0d 16 76 |s(l%,w%)|..l....v|
|00003d00| 05 e1 0d 16 80 04 0d 16 | 8a 15 dd f2 6f 70 65 6e |........|....open|
|00003d10| 6d 65 73 73 28 79 25 2c | 78 25 29 0d 16 94 07 ea |mess(y%,|x%).....|
|00003d20| 6f 25 0d 16 9e 36 21 74 | 6d 70 25 3d 30 3a 74 6d |o%...6!t|mp%=0:tm|
|00003d30| 70 25 21 34 3d 2d 79 25 | 2a 33 32 2d 33 32 3a 74 |p%!4=-y%|*32-32:t|
|00003d40| 6d 70 25 21 38 3d 78 25 | 2a 31 36 2b 31 30 3a 74 |mp%!8=x%|*16+10:t|
|00003d50| 6d 70 25 21 31 32 3d 30 | 0d 16 a8 21 c8 99 22 57 |mp%!12=0|...!.."W|
|00003d60| 69 6d 70 5f 53 65 74 45 | 78 74 65 6e 74 22 2c 6d |imp_SetE|xtent",m|
|00003d70| 65 73 73 25 2c 74 6d 70 | 25 0d 16 b2 3c 21 71 25 |ess%,tmp|%...<!q%|
|00003d80| 3d 6d 65 73 73 25 3a c8 | 99 22 57 69 6d 70 5f 47 |=mess%:.|."Wimp_G|
|00003d90| 65 74 57 69 6e 64 6f 77 | 53 74 61 74 65 22 2c 2c |etWindow|State",,|
|00003da0| 71 25 3a 6f 25 3d 28 71 | 25 21 33 32 29 80 28 31 |q%:o%=(q|%!32).(1|
|00003db0| 3c 3c 31 36 29 0d 16 bc | 2b 71 25 21 31 32 3d 71 |<<16)...|+q%!12=q|
|00003dc0| 25 21 34 2b 78 25 2a 31 | 36 2b 31 30 3a 71 25 21 |%!4+x%*1|6+10:q%!|
|00003dd0| 31 36 3d 71 25 21 38 2b | 79 25 2a 33 32 2b 33 32 |16=q%!8+|y%*32+32|
|00003de0| 0d 16 c6 34 71 25 21 32 | 30 3d 30 3a 71 25 21 32 |...4q%!2|0=0:q%!2|
|00003df0| 34 3d 30 3a 71 25 21 32 | 38 3d 2d 31 3a c8 99 22 |4=0:q%!2|8=-1:.."|
|00003e00| 57 69 6d 70 5f 4f 70 65 | 6e 57 69 6e 64 6f 77 22 |Wimp_Ope|nWindow"|
|00003e10| 2c 2c 71 25 0d 16 d0 2d | e7 6f 25 3d 30 8c f2 63 |,,q%...-|.o%=0..c|
|00003e20| 66 72 6f 6e 74 28 6d 65 | 73 73 25 2c 30 2c 31 35 |front(me|ss%,0,15|
|00003e30| 30 29 20 8b f2 66 72 6f | 6e 74 28 6d 65 73 73 25 |0) ..fro|nt(mess%|
|00003e40| 29 0d 16 da 3a 21 71 25 | 3d 6d 65 73 73 25 3a c8 |)...:!q%|=mess%:.|
|00003e50| 99 22 57 69 6d 70 5f 47 | 65 74 57 69 6e 64 6f 77 |."Wimp_G|etWindow|
|00003e60| 53 74 61 74 65 22 2c 2c | 71 25 3a 6d 73 67 77 25 |State",,|q%:msgw%|
|00003e70| 3d 71 25 21 31 32 2d 71 | 25 21 34 0d 16 e4 24 f2 |=q%!12-q|%!4...$.|
|00003e80| 75 70 64 61 74 65 5f 6d | 73 67 28 30 2c 2d 79 25 |update_m|sg(0,-y%|
|00003e90| 2a 33 32 2d 33 32 2c 6d | 73 67 77 25 2c 30 29 0d |*32-32,m|sgw%,0).|
|00003ea0| 16 ee 05 e1 0d 16 f8 04 | 0d 17 02 11 dd f2 6d 73 |........|......ms|
|00003eb0| 67 66 69 6c 74 28 41 24 | 29 0d 17 0c 29 e7 6d 73 |gfilt(A$|)...).ms|
|00003ec0| 67 5f 63 73 25 3d 31 20 | 80 a7 41 24 2c 6d 73 67 |g_cs%=1 |..A$,msg|
|00003ed0| 5f 63 73 24 29 3e 30 20 | 8c 6d 73 67 5f 63 73 25 |_cs$)>0 |.msg_cs%|
|00003ee0| 3d 32 0d 17 16 10 e7 6d | 73 67 5f 63 73 25 3d 32 |=2.....m|sg_cs%=2|
|00003ef0| 20 8c 0d 17 20 20 20 20 | 6d 73 67 5f 63 6d 25 2d | ... |msg_cm%-|
|00003f00| 3d 31 3a f2 61 64 64 6d | 65 73 73 61 67 65 28 41 |=1:.addm|essage(A|
|00003f10| 24 29 0d 17 2a 47 20 20 | e7 6d 73 67 5f 63 6d 25 |$)..*G |.msg_cm%|
|00003f20| 3c 31 84 28 6d 73 67 5f | 63 65 24 3e 22 22 80 a7 |<1.(msg_|ce$>""..|
|00003f30| 41 24 2c 6d 73 67 5f 63 | 65 24 29 3e 30 29 20 8c |A$,msg_c|e$)>0) .|
|00003f40| 6d 73 67 5f 63 73 25 3d | 30 3a f2 61 64 64 6d 65 |msg_cs%=|0:.addme|
|00003f50| 73 73 61 67 65 28 22 22 | 29 0d 17 34 05 cd 0d 17 |ssage(""|)..4....|
|00003f60| 3e 05 e1 0d 17 48 04 0d | 17 52 0c dd f2 70 61 75 |>....H..|.R...pau|
|00003f70| 73 65 64 0d 17 5c 15 ea | 72 65 74 75 72 6e 25 2c |sed..\..|return%,|
|00003f80| 6f 6c 64 73 74 6f 70 25 | 0d 17 66 2f 70 61 75 73 |oldstop%|..f/paus|
|00003f90| 65 25 3d b9 3a f2 63 68 | 61 6e 67 65 62 75 74 74 |e%=.:.ch|angebutt|
|00003fa0| 6f 6e 28 73 74 61 74 75 | 73 25 2c 35 2c 22 75 6e |on(statu|s%,5,"un|
|00003fb0| 70 61 75 73 65 22 29 0d | 17 70 21 f2 70 72 69 6e |pause").|.p!.prin|
|00003fc0| 74 28 22 22 2c a4 6d 73 | 67 30 28 22 50 61 75 73 |t("",.ms|g0("Paus|
|00003fd0| 65 64 22 29 2c 22 22 29 | 0d 17 7a 05 f5 0d 17 84 |ed"),"")|..z.....|
|00003fe0| 0f 20 20 f2 70 6f 6c 6c | 28 33 30 29 0d 17 8e 54 |. .poll|(30)...T|
|00003ff0| 20 20 e7 a4 74 65 73 74 | 65 76 65 6e 74 20 8c 6f | ..test|event .o|
|00004000| 6c 64 73 74 6f 70 25 3d | 73 74 6f 70 25 3a 73 74 |ldstop%=|stop%:st|
|00004010| 6f 70 25 3d 30 3a 72 65 | 74 75 72 6e 25 3d a4 63 |op%=0:re|turn%=.c|
|00004020| 6f 6d 6d 61 6e 64 28 a4 | 67 65 74 65 76 65 6e 74 |ommand(.|getevent|
|00004030| 29 3a 73 74 6f 70 25 3d | 6f 6c 64 73 74 6f 70 25 |):stop%=|oldstop%|
|00004040| 0d 17 98 0d fd 70 61 75 | 73 65 25 3d a3 0d 17 a2 |.....pau|se%=....|
|00004050| 05 e1 0d 17 ac 04 0d 17 | b6 0d dd f2 75 6e 70 61 |........|....unpa|
|00004060| 75 73 65 0d 17 c0 26 70 | 61 75 73 65 25 3d a3 3a |use...&p|ause%=.:|
|00004070| 73 74 6f 70 25 3d a3 3a | 72 75 6e 25 3d b9 3a 6d |stop%=.:|run%=.:m|
|00004080| 73 67 77 61 69 74 25 3d | 30 0d 17 ca 36 f2 63 68 |sgwait%=|0...6.ch|
|00004090| 61 6e 67 65 62 75 74 74 | 6f 6e 28 73 74 61 74 75 |angebutt|on(statu|
|000040a0| 73 25 2c 35 2c 22 70 61 | 75 73 65 22 29 3a f2 70 |s%,5,"pa|use"):.p|
|000040b0| 72 69 6e 74 28 22 22 2c | 22 20 22 2c 22 22 29 0d |rint("",|" ","").|
|000040c0| 17 d4 05 e1 0d 17 de 04 | 0d 17 e8 0a dd f2 73 74 |........|......st|
|000040d0| 6f 70 0d 17 f2 35 63 61 | 6c 6c 5f 6c 65 76 25 3d |op...5ca|ll_lev%=|
|000040e0| 30 3a 63 61 6c 6c 5f 6c | 6f 63 6b 25 28 29 3d 30 |0:call_l|ock%()=0|
|000040f0| 3a 65 76 65 6e 74 24 28 | 29 3d 22 22 3a 65 76 65 |:event$(|)="":eve|
|00004100| 6e 74 25 28 29 3d b9 0d | 17 fc 37 6d 73 67 5f 63 |nt%()=..|..7msg_c|
|00004110| 73 25 3d 30 3a 75 73 65 | 72 6d 65 6e 75 24 28 29 |s%=0:use|rmenu$()|
|00004120| 3d 22 22 3a 61 6c 61 72 | 6d 24 28 29 3d 22 22 3a |="":alar|m$()="":|
|00004130| 61 6c 61 72 6d 74 69 6d | 65 25 28 29 3d 30 0d 18 |alarmtim|e%()=0..|
|00004140| 06 18 e7 73 74 61 67 65 | 25 3e 30 80 73 74 6f 70 |...stage|%>0.stop|
|00004150| 24 3c 3e 22 22 8c 0d 18 | 10 21 20 20 f2 61 64 64 |$<>""...|.! .add|
|00004160| 65 76 65 6e 74 28 73 74 | 6f 70 24 2c 30 29 3a 73 |event(st|op$,0):s|
|00004170| 74 6f 70 24 3d 22 22 0d | 18 1a 07 20 20 cc 0d 18 |top$="".|... ...|
|00004180| 24 2c 20 20 73 74 61 67 | 65 25 3d 30 3a f2 72 65 |$, stag|e%=0:.re|
|00004190| 6c 65 61 73 65 3a f2 61 | 64 64 65 76 65 6e 74 28 |lease:.a|ddevent(|
|000041a0| 22 70 61 75 73 65 22 2c | 30 29 0d 18 2e 05 cd 0d |"pause",|0)......|
|000041b0| 18 38 05 e1 0d 18 42 04 | 0d 18 4c 29 dd f2 64 6f |.8....B.|..L)..do|
|000041c0| 6d 65 6e 75 28 68 61 6e | 64 6c 65 25 2c 6d 65 6e |menu(han|dle%,men|
|000041d0| 75 24 2c 6d 65 6e 75 74 | 69 74 6c 65 24 2c 49 25 |u$,menut|itle$,I%|
|000041e0| 29 0d 18 56 21 ea 69 25 | 2c 69 74 65 6d 24 2c 6d |)..V!.i%|,item$,m|
|000041f0| 65 6e 75 49 74 65 6d 73 | 25 2c 6d 65 6e 75 70 74 |enuItems|%,menupt|
|00004200| 72 25 0d 18 60 0f e7 6d | 65 6e 75 24 3d 22 22 8c |r%..`..m|enu$="".|
|00004210| e1 0d 18 6a 12 6d 65 6e | 75 49 74 65 6d 73 25 20 |...j.men|uItems% |
|00004220| 3d 20 30 0d 18 74 17 6d | 65 6e 75 68 61 6e 64 6c |= 0..t.m|enuhandl|
|00004230| 65 25 3d 68 61 6e 64 6c | 65 25 0d 18 7e 16 6d 65 |e%=handl|e%..~.me|
|00004240| 6e 75 70 74 72 25 3d 6d | 65 6e 75 64 61 74 61 25 |nuptr%=m|enudata%|
|00004250| 0d 18 88 08 69 25 3d 30 | 0d 18 92 12 6d 65 6e 75 |....i%=0|....menu|
|00004260| 70 74 72 25 21 32 30 3d | 34 34 0d 18 9c 18 24 6d |ptr%!20=|44....$m|
|00004270| 65 6e 75 70 74 72 25 3d | 6d 65 6e 75 74 69 74 6c |enuptr%=|menutitl|
|00004280| 65 24 0d 18 a6 3c 6d 65 | 6e 75 70 74 72 25 3f 31 |e$...<me|nuptr%?1|
|00004290| 32 3d 37 3a 6d 65 6e 75 | 70 74 72 25 3f 31 33 3d |2=7:menu|ptr%?13=|
|000042a0| 32 3a 6d 65 6e 75 70 74 | 72 25 3f 31 34 3d 26 37 |2:menupt|r%?14=&7|
|000042b0| 3a 6d 65 6e 75 70 74 72 | 25 3f 31 35 3d 30 0d 18 |:menuptr|%?15=0..|
|000042c0| b0 24 6d 65 6e 75 70 74 | 72 25 21 31 36 3d 32 33 |.$menupt|r%!16=23|
|000042d0| 30 2d 32 34 3a 6d 65 6e | 75 70 74 72 25 21 32 34 |0-24:men|uptr%!24|
|000042e0| 3d 30 0d 18 ba 10 6d 65 | 6e 75 70 74 72 25 2b 3d |=0....me|nuptr%+=|
|000042f0| 32 38 0d 18 c4 05 f5 0d | 18 ce 3d 20 20 69 74 65 |28......|..= ite|
|00004300| 6d 24 3d a4 70 61 72 28 | 6d 65 6e 75 24 2c 22 2c |m$=.par(|menu$,",|
|00004310| 22 2c 69 25 29 3a f2 6d | 65 6e 75 69 74 65 6d 28 |",i%):.m|enuitem(|
|00004320| 69 74 65 6d 24 29 3a 6d | 65 6e 75 49 74 65 6d 73 |item$):m|enuItems|
|00004330| 25 2b 3d 31 0d 18 d8 0d | fd 69 74 65 6d 24 3d 22 |%+=1....|.item$="|
|00004340| 22 0d 18 e2 23 6d 65 6e | 75 70 74 72 25 21 2d 32 |"...#men|uptr%!-2|
|00004350| 34 3d 28 6d 65 6e 75 70 | 74 72 25 21 2d 32 34 29 |4=(menup|tr%!-24)|
|00004360| 84 26 38 30 0d 18 ec 2c | e7 49 25 3c 3e 30 20 8c |.&80...,|.I%<>0 .|
|00004370| 59 25 3d 31 32 30 2b 28 | 6d 65 6e 75 49 74 65 6d |Y%=120+(|menuItem|
|00004380| 73 25 2d 31 29 2a 34 34 | 20 8b 59 25 3d 6d 79 25 |s%-1)*44| .Y%=my%|
|00004390| 0d 18 f6 2d c8 99 20 22 | 57 69 6d 70 5f 43 72 65 |...-.. "|Wimp_Cre|
|000043a0| 61 74 65 4d 65 6e 75 22 | 2c 2c 6d 65 6e 75 64 61 |ateMenu"|,,menuda|
|000043b0| 74 61 25 2c 6d 78 25 2d | 36 34 2c 59 25 0d 19 00 |ta%,mx%-|64,Y%...|
|000043c0| 05 e1 0d 19 0a 04 0d 19 | 14 15 dd f2 6d 65 6e 75 |........|....menu|
|000043d0| 69 74 65 6d 28 74 65 78 | 74 24 29 0d 19 1e 0a ea |item(tex|t$).....|
|000043e0| 6c 65 66 74 24 0d 19 28 | 0f e7 20 74 65 78 74 24 |left$..(|.. text$|
|000043f0| 3e 22 22 8c 0d 19 32 11 | 20 20 21 6d 65 6e 75 70 |>""...2.| !menup|
|00004400| 74 72 25 3d 30 0d 19 3c | 30 20 20 e7 c0 74 65 78 |tr%=0..<|0 ..tex|
|00004410| 74 24 2c 31 29 3d 22 7c | 22 8c 74 65 78 74 24 3d |t$,1)="||".text$=|
|00004420| c1 74 65 78 74 24 2c 32 | 29 3a 21 6d 65 6e 75 70 |.text$,2|):!menup|
|00004430| 74 72 25 3d 32 0d 19 46 | 25 20 20 6c 65 66 74 24 |tr%=2..F|% left$|
|00004440| 20 3d 20 c0 74 65 78 74 | 24 2c 31 29 3a 6d 65 6e | = .text|$,1):men|
|00004450| 75 70 74 72 25 21 34 3d | 2d 31 0d 19 50 23 20 20 |uptr%!4=|-1..P# |
|00004460| e7 20 6c 65 66 74 24 3d | 22 3e 22 20 8c 6d 65 6e |. left$=|">" .men|
|00004470| 75 70 74 72 25 21 34 3d | 69 6e 66 6f 25 0d 19 5a |uptr%!4=|info%..Z|
|00004480| 1a 20 20 6d 65 6e 75 70 | 74 72 25 21 38 3d 26 30 |. menup|tr%!8=&0|
|00004490| 37 30 30 30 30 32 31 0d | 19 64 4f 20 20 e7 20 6c |7000021.|.dO . l|
|000044a0| 65 66 74 24 3d 22 3e 22 | 20 84 20 6c 65 66 74 24 |eft$=">"| . left$|
|000044b0| 3d 22 3c 22 20 8c 20 24 | 28 6d 65 6e 75 70 74 72 |="<" . $|(menuptr|
|000044c0| 25 2b 31 32 29 3d c1 74 | 65 78 74 24 2c 32 29 20 |%+12)=.t|ext$,2) |
|000044d0| 8b 20 24 28 6d 65 6e 75 | 70 74 72 25 2b 31 32 29 |. $(menu|ptr%+12)|
|000044e0| 3d 74 65 78 74 24 0d 19 | 6e 12 20 20 6d 65 6e 75 |=text$..|n. menu|
|000044f0| 70 74 72 25 2b 3d 32 34 | 0d 19 78 05 cd 0d 19 82 |ptr%+=24|..x.....|
|00004500| 05 e1 0d 19 8c 04 0d 19 | 96 1a dd a4 70 61 72 28 |........|....par(|
|00004510| 6d 65 6e 75 24 2c 73 65 | 70 24 2c f8 20 69 25 29 |menu$,se|p$,. i%)|
|00004520| 0d 19 a0 08 ea 69 31 25 | 0d 19 aa 25 69 31 25 3d |.....i1%|...%i1%=|
|00004530| 69 25 2b 31 3a 69 25 3d | a7 6d 65 6e 75 24 2b 73 |i%+1:i%=|.menu$+s|
|00004540| 65 70 24 2c 73 65 70 24 | 2c 69 31 25 29 0d 19 b4 |ep$,sep$|,i1%)...|
|00004550| 17 3d c1 6d 65 6e 75 24 | 2c 69 31 25 2c 69 25 2d |.=.menu$|,i1%,i%-|
|00004560| 69 31 25 29 0d 19 be 04 | 0d 19 c8 18 dd f2 6d 65 |i1%)....|......me|
|00004570| 6e 75 73 65 6c 65 63 74 | 28 6d 65 6e 75 73 25 29 |nuselect|(menus%)|
|00004580| 0d 19 d2 07 ea 41 24 0d | 19 dc 3c ea 6c 25 3a c8 |.....A$.|..<.l%:.|
|00004590| 99 22 57 69 6d 70 5f 44 | 65 63 6f 64 65 4d 65 6e |."Wimp_D|ecodeMen|
|000045a0| 75 22 2c 2c 6d 65 6e 75 | 64 61 74 61 25 2c 6d 65 |u",,menu|data%,me|
|000045b0| 6e 75 73 25 2c c4 32 30 | 2c 22 20 22 29 b8 2c 2c |nus%,.20|," ").,,|
|000045c0| 2c 41 24 0d 19 e6 12 c8 | 8e 6d 65 6e 75 68 61 6e |,A$.....|.menuhan|
|000045d0| 64 6c 65 25 ca 0d 19 f0 | 0b 20 20 c9 31 30 31 3a |dle%....|. .101:|
|000045e0| 0d 19 fa 0d 20 20 c8 8e | 20 41 24 20 ca 0d 1a 04 |.... ..| A$ ....|
|000045f0| 25 20 20 20 20 c9 22 43 | 68 6f 69 63 65 73 2e 2e |% ."C|hoices..|
|00004600| 2e 22 3a f2 66 72 6f 6e | 74 28 63 6f 6e 66 69 67 |.":.fron|t(config|
|00004610| 25 29 0d 1a 0e 22 20 20 | 20 20 c9 22 43 6f 6e 74 |%)..." | ."Cont|
|00004620| 72 6f 6c 2e 2e 2e 22 3a | f2 66 72 6f 6e 74 28 74 |rol...":|.front(t|
|00004630| 78 74 25 29 0d 1a 18 19 | 20 20 20 20 c9 22 51 75 |xt%)....| ."Qu|
|00004640| 69 74 22 3a f2 66 69 6e | 69 73 68 3a e0 0d 1a 22 |it":.fin|ish:..."|
|00004650| 07 20 20 cb 0d 1a 2c 0b | 20 20 c9 31 30 32 3a 0d |. ...,.| .102:.|
|00004660| 1a 36 11 20 20 e7 75 6d | 65 6e 75 25 3e 30 20 8c |.6. .um|enu%>0 .|
|00004670| 0d 1a 40 16 20 20 20 20 | 20 20 e3 6c 25 3d 31 b8 |..@. | .l%=1.|
|00004680| 75 6d 65 6e 75 25 0d 1a | 4a 1e 20 20 20 20 20 20 |umenu%..|J. |
|00004690| 20 20 e7 41 24 3d 75 6d | 65 6e 75 24 28 6c 25 2c | .A$=um|enu$(l%,|
|000046a0| 30 29 20 8c 0d 1a 54 2f | 20 20 20 20 20 20 20 20 |0) ...T/| |
|000046b0| 20 20 f2 75 70 64 5f 69 | 63 6f 6e 28 73 74 61 74 | .upd_i|con(stat|
|000046c0| 75 73 25 2c 37 2c 75 6d | 65 6e 75 24 28 6c 25 2c |us%,7,um|enu$(l%,|
|000046d0| 30 29 29 0d 1a 5e 27 20 | 20 20 20 20 20 20 20 20 |0))..^' | |
|000046e0| 20 f2 61 64 64 65 76 65 | 6e 74 28 75 6d 65 6e 75 | .addeve|nt(umenu|
|000046f0| 24 28 6c 25 2c 31 29 2c | 38 29 0d 1a 68 0d 20 20 |$(l%,1),|8)..h. |
|00004700| 20 20 20 20 20 20 cd 0d | 1a 72 0b 20 20 20 20 20 | ..|.r. |
|00004710| 20 ed 0d 1a 7c 07 20 20 | cd 0d 1a 86 0b 20 20 c9 | ...|. |..... .|
|00004720| 31 30 33 3a 0d 1a 90 0d | 20 20 c8 8e 20 41 24 20 |103:....| .. A$ |
|00004730| ca 0d 1a 9a 21 20 20 20 | 20 c9 22 41 6c 61 72 6d |....! | ."Alarm|
|00004740| 20 6c 69 73 74 22 3a f2 | 6c 69 73 74 61 6c 61 72 | list":.|listalar|
|00004750| 6d 73 0d 1a a4 1e 20 20 | 20 20 c9 22 4d 65 6e 75 |ms.... | ."Menu|
|00004760| 20 6c 69 73 74 22 3a f2 | 6c 69 73 74 6d 65 6e 75 | list":.|listmenu|
|00004770| 0d 1a ae 1f 20 20 20 20 | c9 22 54 61 73 6b 20 6c |.... |."Task l|
|00004780| 69 73 74 22 3a f2 6c 69 | 73 74 74 61 73 6b 73 0d |ist":.li|sttasks.|
|00004790| 1a b8 1d 20 20 20 20 c9 | 22 56 61 72 20 6c 69 73 |... .|"Var lis|
|000047a0| 74 22 3a f2 6c 69 73 74 | 76 61 72 73 0d 1a c2 26 |t":.list|vars...&|
|000047b0| 20 20 20 20 c9 22 53 63 | 72 69 70 74 20 6c 69 73 | ."Sc|ript lis|
|000047c0| 74 22 3a f2 6c 69 73 74 | 73 63 72 69 70 74 28 22 |t":.list|script("|
|000047d0| 22 29 0d 1a cc 07 20 20 | cb 0d 1a d6 17 20 20 c9 |").... |..... .|
|000047e0| 31 30 34 3a 64 65 62 75 | 67 25 3d bb c2 41 24 29 |104:debu|g%=..A$)|
|000047f0| 0d 1a e0 2e 20 20 c9 31 | 30 35 3a f2 75 70 64 5f |.... .1|05:.upd_|
|00004800| 69 63 6f 6e 28 63 6f 6e | 66 69 67 25 2c 34 2c 22 |icon(con|fig%,4,"|
|00004810| 73 6c 69 70 64 69 61 6c | 3a 22 2b 41 24 29 0d 1a |slipdial|:"+A$)..|
|00004820| ea 26 20 20 c9 31 30 36 | 3a f2 69 6e 69 74 73 63 |.& .106|:.initsc|
|00004830| 72 69 70 74 28 22 73 6c | 69 70 64 69 61 6c 3a 22 |ript("sl|ipdial:"|
|00004840| 2b 41 24 29 0d 1a f4 05 | cb 0d 1a fe 05 e1 0d 1b |+A$)....|........|
|00004850| 08 04 0d 1b 12 0e dd f2 | 65 72 72 6f 72 62 6f 78 |........|errorbox|
|00004860| 0d 1b 1c 07 ee 85 87 0d | 1b 26 3c 21 62 75 66 66 |........|.&<!buff|
|00004870| 65 72 25 3d 9f 3a 24 28 | 62 75 66 66 65 72 25 2b |er%=.:$(|buffer%+|
|00004880| 34 29 3d f6 24 2b 22 20 | 28 69 6e 74 65 72 6e 61 |4)=.$+" |(interna|
|00004890| 6c 20 63 6f 64 65 20 22 | 2b c3 9e 2b 22 29 2e 22 |l code "|+..+")."|
|000048a0| 2b bd 30 0d 1b 30 31 c8 | 99 20 22 57 69 6d 70 5f |+.0..01.|. "Wimp_|
|000048b0| 52 65 70 6f 72 74 45 72 | 72 6f 72 22 2c 62 75 66 |ReportEr|ror",buf|
|000048c0| 66 65 72 25 2c 31 2c 54 | 61 73 6b 24 3a f2 66 69 |fer%,1,T|ask$:.fi|
|000048d0| 6e 69 73 68 0d 1b 3a 05 | e1 0d 1b 44 04 0d 1b 4e |nish..:.|...D...N|
|000048e0| 14 dd f2 73 79 73 6d 73 | 67 30 28 41 24 2c 77 25 |...sysms|g0(A$,w%|
|000048f0| 29 0d 1b 58 19 f2 73 79 | 73 6d 73 67 28 a4 6d 73 |)..X..sy|smsg(.ms|
|00004900| 67 30 28 41 24 29 2c 77 | 25 29 0d 1b 62 05 e1 0d |g0(A$),w|%)..b...|
|00004910| 1b 6c 04 0d 1b 76 16 dd | f2 73 79 73 6d 73 67 28 |.l...v..|.sysmsg(|
|00004920| 41 24 2c 77 61 69 74 25 | 29 0d 1b 80 1c e7 41 24 |A$,wait%|).....A$|
|00004930| 3d 22 22 f2 63 6c 6f 73 | 65 77 28 73 79 73 6d 73 |="".clos|ew(sysms|
|00004940| 67 25 29 3a e1 0d 1b 8a | 21 f2 75 70 64 5f 69 63 |g%):....|!.upd_ic|
|00004950| 6f 6e 28 73 79 73 6d 73 | 67 25 2c 30 2c c0 41 24 |on(sysms|g%,0,.A$|
|00004960| 2c 31 30 30 29 29 0d 1b | 94 4b e7 77 61 69 74 25 |,100))..|.K.wait%|
|00004970| 3d 30 8c f2 75 70 64 5f | 69 63 6f 6e 28 73 79 73 |=0..upd_|icon(sys|
|00004980| 6d 73 67 25 2c 32 2c 22 | 44 69 73 6d 69 73 73 22 |msg%,2,"|Dismiss"|
|00004990| 29 8b f2 75 70 64 5f 69 | 63 6f 6e 28 73 79 73 6d |)..upd_i|con(sysm|
|000049a0| 73 67 25 2c 32 2c 22 43 | 6f 6e 74 69 6e 75 65 22 |sg%,2,"C|ontinue"|
|000049b0| 29 0d 1b 9e 26 f2 63 66 | 72 6f 6e 74 28 73 79 73 |)...&.cf|ront(sys|
|000049c0| 6d 73 67 25 2c 30 2c 2d | 31 31 30 29 3a 73 79 73 |msg%,0,-|110):sys|
|000049d0| 6d 73 67 77 25 3d b9 0d | 1b a8 0b e7 77 61 69 74 |msgw%=..|....wait|
|000049e0| 25 8c 0d 1b b2 1d 20 20 | f5 f2 70 6f 6c 6c 28 32 |%..... |..poll(2|
|000049f0| 30 30 29 3a fd 73 79 73 | 6d 73 67 77 25 3d a3 0d |00):.sys|msgw%=..|
|00004a00| 1b bc 05 cd 0d 1b c6 05 | e1 0d 1b d0 04 0d 1b da |........|........|
|00004a10| 04 0d 1b e4 0f dd f2 66 | 72 6f 6e 74 28 68 25 29 |.......f|ront(h%)|
|00004a20| 0d 1b ee 26 21 71 25 3d | 68 25 3a c8 99 22 57 69 |...&!q%=|h%:.."Wi|
|00004a30| 6d 70 5f 47 65 74 57 69 | 6e 64 6f 77 53 74 61 74 |mp_GetWi|ndowStat|
|00004a40| 65 22 2c 2c 71 25 0d 1b | f8 24 71 25 21 32 38 3d |e",,q%..|.$q%!28=|
|00004a50| 2d 31 3a c8 99 22 57 69 | 6d 70 5f 4f 70 65 6e 57 |-1:.."Wi|mp_OpenW|
|00004a60| 69 6e 64 6f 77 22 2c 2c | 71 25 0d 1c 02 47 e7 68 |indow",,|q%...G.h|
|00004a70| 25 3d 74 78 74 25 8c c8 | 99 22 57 69 6d 70 5f 53 |%=txt%..|."Wimp_S|
|00004a80| 65 74 43 61 72 65 74 50 | 6f 73 69 74 69 6f 6e 22 |etCaretP|osition"|
|00004a90| 2c 68 25 2c 69 6e 69 63 | 25 2c 2c 2c 2d 31 2c a9 |,h%,inic|%,,,-1,.|
|00004aa0| a4 69 63 5f 73 74 72 28 | 68 25 2c 69 6e 69 63 25 |.ic_str(|h%,inic%|
|00004ab0| 29 0d 1c 0c 05 e1 0d 1c | 16 04 0d 1c 20 1c dd f2 |).......|.... ...|
|00004ac0| 63 66 72 6f 6e 74 28 68 | 25 2c 78 6f 66 66 25 2c |cfront(h|%,xoff%,|
|00004ad0| 79 6f 66 66 25 29 0d 1c | 2a 1a ea 78 25 2c 79 25 |yoff%)..|*..x%,y%|
|00004ae0| 2c 77 78 25 2c 77 79 25 | 2c 78 65 25 2c 79 65 25 |,wx%,wy%|,xe%,ye%|
|00004af0| 0d 1c 34 1e e7 61 75 74 | 6f 77 69 6e 70 6f 73 25 |..4..aut|owinpos%|
|00004b00| 3d 30 80 68 25 3d 73 74 | 61 74 75 73 25 8c 0d 1c |=0.h%=st|atus%...|
|00004b10| 3e 10 20 20 f2 66 72 6f | 6e 74 28 68 25 29 0d 1c |>. .fro|nt(h%)..|
|00004b20| 48 07 20 20 cc 0d 1c 52 | 4b 20 20 c8 99 22 4f 53 |H. ...R|K .."OS|
|00004b30| 5f 52 65 61 64 4d 6f 64 | 65 56 61 72 69 61 62 6c |_ReadMod|eVariabl|
|00004b40| 65 22 2c 2d 31 2c 34 b8 | 2c 2c 78 65 25 3a c8 99 |e",-1,4.|,,xe%:..|
|00004b50| 22 4f 53 5f 52 65 61 64 | 4d 6f 64 65 56 61 72 69 |"OS_Read|ModeVari|
|00004b60| 61 62 6c 65 22 2c 2d 31 | 2c 31 31 b8 2c 2c 78 25 |able",-1|,11.,,x%|
|00004b70| 0d 1c 5c 4b 20 20 c8 99 | 22 4f 53 5f 52 65 61 64 |..\K ..|"OS_Read|
|00004b80| 4d 6f 64 65 56 61 72 69 | 61 62 6c 65 22 2c 2d 31 |ModeVari|able",-1|
|00004b90| 2c 35 b8 2c 2c 79 65 25 | 3a c8 99 22 4f 53 5f 52 |,5.,,ye%|:.."OS_R|
|00004ba0| 65 61 64 4d 6f 64 65 56 | 61 72 69 61 62 6c 65 22 |eadModeV|ariable"|
|00004bb0| 2c 2d 31 2c 31 32 b8 2c | 2c 79 25 0d 1c 66 28 20 |,-1,12.,|,y%..f( |
|00004bc0| 20 21 71 25 3d 68 25 3a | c8 99 22 57 69 6d 70 5f | !q%=h%:|.."Wimp_|
|00004bd0| 47 65 74 57 69 6e 64 6f | 77 53 74 61 74 65 22 2c |GetWindo|wState",|
|00004be0| 2c 71 25 0d 1c 70 39 20 | 20 78 25 3d 78 25 3c 3c |,q%..p9 | x%=x%<<|
|00004bf0| 78 65 25 3a 79 25 3d 79 | 25 3c 3c 79 65 25 3a 77 |xe%:y%=y|%<<ye%:w|
|00004c00| 78 25 3d 71 25 21 31 32 | 2d 71 25 21 34 3a 77 79 |x%=q%!12|-q%!4:wy|
|00004c10| 25 3d 71 25 21 31 36 2d | 71 25 21 38 0d 1c 7a 4f |%=q%!16-|q%!8..zO|
|00004c20| 20 20 71 25 21 34 3d 28 | 78 25 2d 77 78 25 29 81 | q%!4=(|x%-wx%).|
|00004c30| 32 2d 78 6f 66 66 25 3a | 71 25 21 31 32 3d 71 25 |2-xoff%:|q%!12=q%|
|00004c40| 21 34 2b 77 78 25 3a 71 | 25 21 38 3d 28 79 25 2d |!4+wx%:q|%!8=(y%-|
|00004c50| 77 79 25 29 81 32 2d 79 | 6f 66 66 25 3a 71 25 21 |wy%).2-y|off%:q%!|
|00004c60| 31 36 3d 71 25 21 38 2b | 77 79 25 0d 1c 84 36 20 |16=q%!8+|wy%...6 |
|00004c70| 20 71 25 21 32 30 3d 30 | 3a 71 25 21 32 34 3d 30 | q%!20=0|:q%!24=0|
|00004c80| 3a 71 25 21 32 38 3d 2d | 31 3a c8 99 22 57 69 6d |:q%!28=-|1:.."Wim|
|00004c90| 70 5f 4f 70 65 6e 57 69 | 6e 64 6f 77 22 2c 2c 71 |p_OpenWi|ndow",,q|
|00004ca0| 25 0d 1c 8e 05 cd 0d 1c | 98 05 e1 0d 1c a2 04 0d |%.......|........|
|00004cb0| 1c ac 11 dd f2 64 6f 74 | 69 74 6c 65 28 68 25 29 |.....dot|itle(h%)|
|00004cc0| 0d 1c b6 28 21 71 25 3d | 68 25 3a c8 99 22 57 69 |...(!q%=|h%:.."Wi|
|00004cd0| 6d 70 5f 47 65 74 57 69 | 6e 64 6f 77 4f 75 74 6c |mp_GetWi|ndowOutl|
|00004ce0| 69 6e 65 22 2c 2c 71 25 | 0d 1c c0 35 c8 99 22 57 |ine",,q%|...5.."W|
|00004cf0| 69 6d 70 5f 46 6f 72 63 | 65 52 65 64 72 61 77 22 |imp_Forc|eRedraw"|
|00004d00| 2c 2d 31 2c 71 25 21 34 | 2c 71 25 21 31 36 2d 34 |,-1,q%!4|,q%!16-4|
|00004d10| 34 2c 71 25 21 31 32 2c | 71 25 21 31 36 0d 1c ca |4,q%!12,|q%!16...|
|00004d20| 05 e1 0d 1c d4 04 0d 1c | de 13 dd a4 69 63 5f 73 |........|....ic_s|
|00004d30| 74 72 28 48 25 2c 49 25 | 29 0d 1c e8 2c 21 71 25 |tr(H%,I%|)...,!q%|
|00004d40| 3d 48 25 3a 71 25 21 34 | 3d 49 25 3a c8 99 22 57 |=H%:q%!4|=I%:.."W|
|00004d50| 69 6d 70 5f 47 65 74 49 | 63 6f 6e 53 74 61 74 65 |imp_GetI|conState|
|00004d60| 22 2c 2c 71 25 0d 1c f2 | 10 3d a4 73 74 72 28 71 |",,q%...|.=.str(q|
|00004d70| 25 21 32 38 29 0d 1c fc | 04 0d 1d 06 1d dd f2 73 |%!28)...|.......s|
|00004d80| 65 74 69 63 6f 6e 73 74 | 72 69 6e 67 28 48 25 2c |eticonst|ring(H%,|
|00004d90| 49 25 2c 41 24 29 0d 1d | 10 31 21 71 25 3d 48 25 |I%,A$)..|.1!q%=H%|
|00004da0| 3a 71 25 21 34 3d 49 25 | 3a c8 99 22 58 57 69 6d |:q%!4=I%|:.."XWim|
|00004db0| 70 5f 47 65 74 49 63 6f | 6e 53 74 61 74 65 22 2c |p_GetIco|nState",|
|00004dc0| 2c 71 25 b8 3b 46 25 0d | 1d 1a 2a e7 a4 74 66 31 |,q%.;F%.|..*..tf1|
|00004dd0| 30 28 46 25 29 80 71 25 | 21 32 38 3e 26 38 38 30 |0(F%).q%|!28>&880|
|00004de0| 30 20 8c 24 28 71 25 21 | 32 38 29 3d 41 24 2b bd |0 .$(q%!|28)=A$+.|
|00004df0| 30 0d 1d 24 05 e1 0d 1d | 2e 04 0d 1d 38 1d dd f2 |0..$....|....8...|
|00004e00| 73 65 74 76 61 6c 69 64 | 61 74 69 6f 6e 28 48 25 |setvalid|ation(H%|
|00004e10| 2c 49 25 2c 41 24 29 0d | 1d 42 31 21 71 25 3d 48 |,I%,A$).|.B1!q%=H|
|00004e20| 25 3a 71 25 21 34 3d 49 | 25 3a c8 99 22 58 57 69 |%:q%!4=I|%:.."XWi|
|00004e30| 6d 70 5f 47 65 74 49 63 | 6f 6e 53 74 61 74 65 22 |mp_GetIc|onState"|
|00004e40| 2c 2c 71 25 b8 3b 46 25 | 0d 1d 4c 30 24 28 71 25 |,,q%.;F%|..L0$(q%|
|00004e50| 21 33 32 29 3d 41 24 2b | bd 30 3a 21 71 25 3d 48 |!32)=A$+|.0:!q%=H|
|00004e60| 25 3a 71 25 21 34 3d 49 | 25 3a 71 25 21 38 3d 30 |%:q%!4=I|%:q%!8=0|
|00004e70| 3a 71 25 21 31 32 3d 30 | 0d 1d 56 1d c8 99 22 57 |:q%!12=0|..V..."W|
|00004e80| 69 6d 70 5f 53 65 74 49 | 63 6f 6e 53 74 61 74 65 |imp_SetI|conState|
|00004e90| 22 2c 2c 71 25 0d 1d 60 | 05 e1 0d 1d 6a 04 0d 1d |",,q%..`|....j...|
|00004ea0| 74 18 dd f2 75 70 64 5f | 69 63 6f 6e 28 48 25 2c |t...upd_|icon(H%,|
|00004eb0| 49 25 2c 41 24 29 0d 1d | 7e 3a f2 73 65 74 69 63 |I%,A$)..|~:.setic|
|00004ec0| 6f 6e 73 74 72 69 6e 67 | 28 48 25 2c 49 25 2c 41 |onstring|(H%,I%,A|
|00004ed0| 24 29 3a 21 71 25 3d 48 | 25 3a 71 25 21 34 3d 49 |$):!q%=H|%:q%!4=I|
|00004ee0| 25 3a 71 25 21 38 3d 30 | 3a 71 25 21 31 32 3d 30 |%:q%!8=0|:q%!12=0|
|00004ef0| 0d 1d 88 1d c8 99 22 57 | 69 6d 70 5f 53 65 74 49 |......"W|imp_SetI|
|00004f00| 63 6f 6e 53 74 61 74 65 | 22 2c 2c 71 25 0d 1d 92 |conState|",,q%...|
|00004f10| 05 e1 0d 1d 9c 04 0d 1d | a6 1c dd f2 63 68 61 6e |........|....chan|
|00004f20| 67 65 62 75 74 74 6f 6e | 28 48 25 2c 49 25 2c 41 |gebutton|(H%,I%,A|
|00004f30| 24 29 0d 1d b0 1f f2 75 | 70 64 5f 69 6e 64 28 48 |$).....u|pd_ind(H|
|00004f40| 25 2c 49 25 2c 22 52 35 | 2c 33 3b 53 22 2b 41 24 |%,I%,"R5|,3;S"+A$|
|00004f50| 29 0d 1d ba 05 e1 0d 1d | c4 04 0d 1d ce 17 dd f2 |).......|........|
|00004f60| 75 70 64 5f 69 6e 64 28 | 48 25 2c 49 25 2c 41 24 |upd_ind(|H%,I%,A$|
|00004f70| 29 0d 1d d8 40 21 71 25 | 3d 48 25 3a 71 25 21 34 |)...@!q%|=H%:q%!4|
|00004f80| 3d 49 25 3a c8 99 22 58 | 57 69 6d 70 5f 47 65 74 |=I%:.."X|Wimp_Get|
|00004f90| 49 63 6f 6e 53 74 61 74 | 65 22 2c 2c 71 25 b8 3b |IconStat|e",,q%.;|
|00004fa0| 46 25 3a 24 28 71 25 21 | 33 32 29 3d 41 24 2b bd |F%:$(q%!|32)=A$+.|
|00004fb0| 30 0d 1d e2 21 21 71 25 | 3d 48 25 3a 71 25 21 34 |0...!!q%|=H%:q%!4|
|00004fc0| 3d 49 25 3a 71 25 21 38 | 3d 30 3a 71 25 21 31 32 |=I%:q%!8|=0:q%!12|
|00004fd0| 3d 30 0d 1d ec 1d c8 99 | 22 57 69 6d 70 5f 53 65 |=0......|"Wimp_Se|
|00004fe0| 74 49 63 6f 6e 53 74 61 | 74 65 22 2c 2c 71 25 0d |tIconSta|te",,q%.|
|00004ff0| 1d f6 05 e1 0d 1e 00 04 | 0d 1e 0a 16 dd f2 73 65 |........|......se|
|00005000| 74 69 6e 76 28 48 25 2c | 49 25 2c 53 25 29 0d 1e |tinv(H%,|I%,S%)..|
|00005010| 14 3d 53 25 3d 94 28 53 | 25 3d 30 29 3a 21 71 25 |.=S%=.(S|%=0):!q%|
|00005020| 3d 48 25 3a 71 25 21 34 | 3d 49 25 3a 71 25 21 38 |=H%:q%!4|=I%:q%!8|
|00005030| 3d 28 28 31 29 3c 3c 32 | 31 29 2a 53 25 3a 71 25 |=((1)<<2|1)*S%:q%|
|00005040| 21 31 32 3d 28 31 3c 3c | 32 31 29 0d 1e 1e 1d c8 |!12=(1<<|21).....|
|00005050| 99 22 57 69 6d 70 5f 53 | 65 74 49 63 6f 6e 53 74 |."Wimp_S|etIconSt|
|00005060| 61 74 65 22 2c 2c 71 25 | 0d 1e 28 05 e1 0d 1e 32 |ate",,q%|..(....2|
|00005070| 04 0d 1e 3c 12 dd a4 72 | 64 69 6e 76 28 48 25 2c |...<...r|dinv(H%,|
|00005080| 49 25 29 0d 1e 46 2c 21 | 71 25 3d 48 25 3a 71 25 |I%)..F,!|q%=H%:q%|
|00005090| 21 34 3d 49 25 3a c8 99 | 22 57 69 6d 70 5f 47 65 |!4=I%:..|"Wimp_Ge|
|000050a0| 74 49 63 6f 6e 53 74 61 | 74 65 22 2c 2c 71 25 0d |tIconSta|te",,q%.|
|000050b0| 1e 50 24 3d ac 28 28 28 | 71 25 21 32 34 29 80 28 |.P$=.(((|q%!24).(|
|000050c0| 31 3c 3c 32 31 29 29 81 | 32 30 39 37 31 35 32 3c |1<<21)).|2097152<|
|000050d0| 3e 30 29 0d 1e 5a 04 0d | 1e 64 19 dd f2 73 65 74 |>0)..Z..|.d...set|
|000050e0| 73 68 61 64 65 64 28 48 | 25 2c 49 25 2c 53 25 29 |shaded(H|%,I%,S%)|
|000050f0| 0d 1e 6e 33 21 71 25 3d | 48 25 3a 71 25 21 34 3d |..n3!q%=|H%:q%!4=|
|00005100| 49 25 3a 71 25 21 38 3d | 28 28 31 29 3c 3c 32 32 |I%:q%!8=|((1)<<22|
|00005110| 29 2a 94 53 25 3a 71 25 | 21 31 32 3d 28 31 3c 3c |)*.S%:q%|!12=(1<<|
|00005120| 32 32 29 0d 1e 78 1d c8 | 99 22 57 69 6d 70 5f 53 |22)..x..|."Wimp_S|
|00005130| 65 74 49 63 6f 6e 53 74 | 61 74 65 22 2c 2c 71 25 |etIconSt|ate",,q%|
|00005140| 0d 1e 82 05 e1 0d 1e 8c | 04 0d 1e 96 15 dd f2 70 |........|.......p|
|00005150| 72 69 6e 74 28 61 24 2c | 62 24 2c 63 24 29 0d 1e |rint(a$,|b$,c$)..|
|00005160| a0 42 e7 61 24 3e 22 22 | 8c f2 75 70 64 5f 69 63 |.B.a$>""|..upd_ic|
|00005170| 6f 6e 28 73 74 61 74 75 | 73 25 2c 31 2c c2 61 24 |on(statu|s%,1,.a$|
|00005180| 2c 35 38 29 29 3a e7 a9 | 61 24 3e 31 8c f2 6c 6f |,58)):..|a$>1..lo|
|00005190| 67 28 22 41 63 74 69 6f | 6e 3a 20 22 2b 61 24 29 |g("Actio|n: "+a$)|
|000051a0| 0d 1e aa 42 e7 62 24 3e | 22 22 8c f2 75 70 64 5f |...B.b$>|""..upd_|
|000051b0| 69 63 6f 6e 28 73 74 61 | 74 75 73 25 2c 32 2c c2 |icon(sta|tus%,2,.|
|000051c0| 62 24 2c 35 38 29 29 3a | e7 a9 62 24 3e 31 8c f2 |b$,58)):|..b$>1..|
|000051d0| 6c 6f 67 28 22 53 74 61 | 74 75 73 3a 20 22 2b 62 |log("Sta|tus: "+b|
|000051e0| 24 29 0d 1e b4 42 e7 63 | 24 3e 22 22 8c f2 75 70 |$)...B.c|$>""..up|
|000051f0| 64 5f 69 63 6f 6e 28 73 | 74 61 74 75 73 25 2c 33 |d_icon(s|tatus%,3|
|00005200| 2c c2 63 24 2c 35 38 29 | 29 3a e7 a9 63 24 3e 31 |,.c$,58)|):..c$>1|
|00005210| 8c f2 6c 6f 67 28 22 49 | 50 20 61 64 64 3a 20 22 |..log("I|P add: "|
|00005220| 2b 63 24 29 0d 1e be 05 | e1 0d 1e c8 04 0d 1e d2 |+c$)....|........|
|00005230| 37 dd f2 6f 70 65 6e 77 | 28 68 61 6e 64 6c 65 25 |7..openw|(handle%|
|00005240| 2c 78 30 25 2c 79 30 25 | 2c 78 31 25 2c 79 31 25 |,x0%,y0%|,x1%,y1%|
|00005250| 2c 73 63 78 25 2c 73 63 | 79 25 2c 62 68 61 6e 64 |,scx%,sc|y%,bhand|
|00005260| 6c 65 25 29 0d 1e dc 10 | e7 68 61 6e 64 6c 65 25 |le%)....|.handle%|
|00005270| 3e 2d 31 8c 0d 1e e6 21 | 20 20 71 25 21 30 3d 68 |>-1....!| q%!0=h|
|00005280| 61 6e 64 6c 65 25 3a 71 | 25 21 32 38 3d 62 68 61 |andle%:q|%!28=bha|
|00005290| 6e 64 6c 65 25 0d 1e f0 | 2b 20 20 71 25 21 34 3d |ndle%...|+ q%!4=|
|000052a0| 78 30 25 3a 71 25 21 38 | 3d 79 30 25 3a 71 25 21 |x0%:q%!8|=y0%:q%!|
|000052b0| 31 32 3d 78 31 25 3a 71 | 25 21 31 36 3d 79 31 25 |12=x1%:q|%!16=y1%|
|000052c0| 0d 1e fa 1b 20 20 71 25 | 21 32 30 3d 73 63 78 25 |.... q%|!20=scx%|
|000052d0| 3a 71 25 21 32 34 3d 73 | 63 79 25 0d 1f 04 1d 20 |:q%!24=s|cy%.... |
|000052e0| 20 c8 99 22 57 69 6d 70 | 5f 4f 70 65 6e 57 69 6e | .."Wimp|_OpenWin|
|000052f0| 64 6f 77 22 2c 2c 71 25 | 0d 1f 0e 05 cd 0d 1f 18 |dow",,q%|........|
|00005300| 05 e1 0d 1f 22 04 0d 1f | 2c 10 dd f2 63 6c 6f 73 |...."...|,...clos|
|00005310| 65 77 28 68 25 29 0d 1f | 36 07 ea 4c 25 0d 1f 40 |ew(h%)..|6..L%..@|
|00005320| 09 c8 8e 68 25 ca 0d 1f | 4a 27 20 20 c9 6d 65 73 |...h%...|J' .mes|
|00005330| 73 25 3a e7 70 61 75 73 | 65 25 80 6d 73 67 77 61 |s%:.paus|e%.msgwa|
|00005340| 69 74 25 20 8c f2 75 6e | 70 61 75 73 65 0d 1f 54 |it% ..un|pause..T|
|00005350| 18 20 20 c9 69 6e 70 75 | 74 25 3a 69 6e 70 75 74 |. .inpu|t%:input|
|00005360| 24 3d 22 20 22 0d 1f 5e | 19 20 20 c9 73 79 73 6d |$=" "..^|. .sysm|
|00005370| 73 67 25 3a 73 79 73 6d | 73 67 77 25 3d 30 0d 1f |sg%:sysm|sgw%=0..|
|00005380| 68 08 20 20 7f 3a 0d 1f | 72 14 20 20 20 20 e3 4c |h. .:..|r. .L|
|00005390| 25 3d 30 b8 74 77 6d 61 | 78 25 0d 1f 7c 22 20 20 |%=0.twma|x%..|" |
|000053a0| 20 20 20 20 e7 68 25 3d | 74 77 77 25 28 4c 25 29 | .h%=|tww%(L%)|
|000053b0| 80 74 77 68 25 28 4c 25 | 29 3e 30 8c 0d 1f 86 2f |.twh%(L%|)>0..../|
|000053c0| 20 20 20 20 20 20 20 20 | ef 37 3a e7 a4 79 65 73 | |.7:..yes|
|000053d0| 6e 6f 28 a4 6d 73 67 30 | 28 22 54 61 73 6b 4b 69 |no(.msg0|("TaskKi|
|000053e0| 6c 6c 22 29 2c 33 29 3d | 32 20 8c 0d 1f 90 29 20 |ll"),3)=|2 ....) |
|000053f0| 20 20 20 20 20 20 20 20 | 20 f2 6d 65 73 73 74 77 | | .messtw|
|00005400| 28 74 77 6e 61 6d 65 24 | 28 4c 25 29 2c 26 38 30 |(twname$|(L%),&80|
|00005410| 38 43 34 29 0d 1f 9a 0f | 20 20 20 20 20 20 20 20 |8C4)....| |
|00005420| 20 20 cc 0d 1f a4 12 20 | 20 20 20 20 20 20 20 20 | ..... | |
|00005430| 20 68 25 3d 30 0d 1f ae | 0d 20 20 20 20 20 20 20 | h%=0...|. |
|00005440| 20 cd 0d 1f b8 15 20 20 | 20 20 20 20 20 20 4c 25 | ..... | L%|
|00005450| 3d 74 77 6d 61 78 25 0d | 1f c2 0b 20 20 20 20 20 |=twmax%.|... |
|00005460| 20 cd 0d 1f cc 09 20 20 | 20 20 ed 0d 1f d6 05 cb | ..... | ......|
|00005470| 0d 1f e0 29 e7 68 25 3e | 30 8c 21 71 25 3d 68 25 |...).h%>|0.!q%=h%|
|00005480| 3a c8 99 22 57 69 6d 70 | 5f 43 6c 6f 73 65 57 69 |:.."Wimp|_CloseWi|
|00005490| 6e 64 6f 77 22 2c 2c 71 | 25 0d 1f ea 05 e1 0d 1f |ndow",,q|%.......|
|000054a0| f4 04 0d 1f fe 0d dd a4 | 61 73 6b 28 41 24 29 0d |........|ask(A$).|
|000054b0| 20 08 21 ea 64 25 2c 72 | 25 2c 64 65 66 25 3a 64 | .!.d%,r|%,def%:d|
|000054c0| 25 3d 36 30 3a 72 25 3d | 30 3a 64 65 66 25 3d 31 |%=60:r%=|0:def%=1|
|000054d0| 0d 20 12 12 f5 42 24 3d | a4 70 61 72 61 6d 28 41 |. ...B$=|.param(A|
|000054e0| 24 29 0d 20 1c 12 20 20 | e7 c0 42 24 2c 31 29 3d |$). .. |..B$,1)=|
|000054f0| 22 2f 22 8c 0d 20 26 1f | 20 20 20 20 43 24 3d a4 |"/".. &.| C$=.|
|00005500| 76 61 6c 75 65 28 42 24 | 29 3a c8 8e c0 42 24 2c |value(B$|):...B$,|
|00005510| 33 29 ca 0d 20 30 22 20 | 20 20 20 20 20 c9 22 64 |3).. 0" | ."d|
|00005520| 65 6c 22 3a 64 25 3d bb | 43 24 3a e7 64 25 3c 35 |el":d%=.|C$:.d%<5|
|00005530| 8c 64 25 3d 35 0d 20 3a | 31 20 20 20 20 20 20 c9 |.d%=5. :|1 .|
|00005540| 22 64 65 66 22 3a 43 24 | 3d a4 6c 6f 77 65 72 28 |"def":C$|=.lower(|
|00005550| 43 24 29 3a e7 c0 43 24 | 2c 31 29 3d 22 79 22 8c |C$):..C$|,1)="y".|
|00005560| 64 65 66 25 3d 32 0d 20 | 44 09 20 20 20 20 cb 0d |def%=2. |D. ..|
|00005570| 20 4e 09 20 20 20 20 cc | 0d 20 58 18 20 20 20 20 | N. .|. X. |
|00005580| 72 25 3d a4 79 65 73 6e | 6f 28 42 24 2c 64 25 29 |r%=.yesn|o(B$,d%)|
|00005590| 0d 20 62 07 20 20 cd 0d | 20 6c 0a fd 41 24 3d 22 |. b. ..| l..A$="|
|000055a0| 22 0d 20 76 11 e7 72 25 | 3d 30 8c 72 25 3d 64 65 |". v..r%|=0.r%=de|
|000055b0| 66 25 0d 20 80 0c 3d 2d | 28 72 25 3d 32 29 0d 20 |f%. ..=-|(r%=2). |
|000055c0| 8a 04 0d 20 94 09 f4 20 | 2a 2a 2a 0d 20 9e 04 0d |... ... |***. ...|
|000055d0| 20 a8 15 dd a4 79 65 73 | 6e 6f 28 41 24 2c 77 61 | ....yes|no(A$,wa|
|000055e0| 69 74 25 29 0d 20 b2 22 | f4 20 72 65 74 75 72 6e |it%). ."|. return|
|000055f0| 73 20 30 3d 74 69 6d 65 | 6f 75 74 20 31 3d 6e 6f |s 0=time|out 1=no|
|00005600| 20 32 3d 79 65 73 0d 20 | bc 3e ea 73 74 25 3a 73 | 2=yes. |.>.st%:s|
|00005610| 74 25 3d 74 69 6d 65 25 | 3a 77 61 69 74 25 3d 77 |t%=time%|:wait%=w|
|00005620| 61 69 74 25 2a 31 30 30 | 3a f2 75 70 64 5f 69 63 |ait%*100|:.upd_ic|
|00005630| 6f 6e 28 79 65 73 6e 6f | 25 2c 32 2c c0 41 24 2c |on(yesno|%,2,.A$,|
|00005640| 35 37 29 29 0d 20 c6 2c | f2 63 66 72 6f 6e 74 28 |57)). .,|.cfront(|
|00005650| 79 65 73 6e 6f 25 2c 30 | 2c 30 29 3a e7 77 61 69 |yesno%,0|,0):.wai|
|00005660| 74 25 3d 30 8c 77 61 69 | 74 25 3d 36 30 30 30 30 |t%=0.wai|t%=60000|
|00005670| 0d 20 d0 38 79 65 73 6e | 6f 61 6e 73 25 3d 30 3a |. .8yesn|oans%=0:|
|00005680| f5 3a f2 70 6f 6c 6c 28 | 35 30 29 3a fd 79 65 73 |.:.poll(|50):.yes|
|00005690| 6e 6f 61 6e 73 25 3e 30 | 84 74 69 6d 65 25 2d 73 |noans%>0|.time%-s|
|000056a0| 74 25 3e 77 61 69 74 25 | 0d 20 da 13 f2 63 6c 6f |t%>wait%|. ...clo|
|000056b0| 73 65 77 28 79 65 73 6e | 6f 25 29 0d 20 e4 0e 3d |sew(yesn|o%). ..=|
|000056c0| 79 65 73 6e 6f 61 6e 73 | 25 0d 20 ee 04 0d 20 f8 |yesnoans|%. ... .|
|000056d0| 10 dd a4 76 61 72 76 61 | 6c 28 41 24 29 0d 21 02 |...varva|l(A$).!.|
|000056e0| 0a ea 4c 25 2c 46 25 0d | 21 0c 2f c8 99 22 58 4f |..L%,F%.|!./.."XO|
|000056f0| 53 5f 52 65 61 64 56 61 | 72 56 61 6c 22 2c 41 24 |S_ReadVa|rVal",A$|
|00005700| 2c 74 6d 70 25 2c 32 35 | 36 2c 30 2c 33 20 b8 2c |,tmp%,25|6,0,3 .,|
|00005710| 2c 4c 25 3b 46 25 0d 21 | 16 19 e7 28 46 25 80 31 |,L%;F%.!|...(F%.1|
|00005720| 29 20 84 4c 25 3e 32 35 | 36 20 8c 3a 3d 22 22 0d |) .L%>25|6 .:="".|
|00005730| 21 20 15 74 6d 70 25 3f | 4c 25 3d 31 33 3a 3d 24 |! .tmp%?|L%=13:=$|
|00005740| 74 6d 70 25 0d 21 2a 04 | 0d 21 34 0e dd f2 69 6e |tmp%.!*.|.!4...in|
|00005750| 66 6f 28 71 25 29 0d 21 | 3e 3d 78 30 25 3d 21 71 |fo(q%).!|>=x0%=!q|
|00005760| 25 3a 79 30 25 3d 71 25 | 21 34 3a 78 31 25 3d 71 |%:y0%=q%|!4:x1%=q|
|00005770| 25 21 38 3a 79 31 25 3d | 71 25 21 31 32 3a 73 63 |%!8:y1%=|q%!12:sc|
|00005780| 78 25 3d 71 25 21 31 36 | 3a 73 63 79 25 3d 71 25 |x%=q%!16|:scy%=q%|
|00005790| 21 32 30 0d 21 48 33 62 | 78 25 3d 78 30 25 2d 73 |!20.!H3b|x%=x0%-s|
|000057a0| 63 78 25 3a 62 79 25 3d | 79 31 25 2d 73 63 79 25 |cx%:by%=|y1%-scy%|
|000057b0| 3a 67 79 30 25 3d 71 25 | 21 32 38 3a 67 79 31 25 |:gy0%=q%|!28:gy1%|
|000057c0| 3d 71 25 21 33 36 0d 21 | 52 05 e1 0d 21 5c 04 0d |=q%!36.!|R...!\..|
|000057d0| 21 66 11 dd f2 72 65 64 | 72 61 77 77 28 68 25 29 |!f...red|raww(h%)|
|000057e0| 0d 21 70 15 ea 74 77 25 | 3a 21 71 25 3d 68 25 3a |.!p..tw%|:!q%=h%:|
|000057f0| c8 8e 68 25 ca 0d 21 7a | 0a c9 74 78 74 25 3a 0d |..h%..!z|..txt%:.|
|00005800| 21 84 28 20 20 c8 99 20 | 22 57 69 6d 70 5f 52 65 |!.( .. |"Wimp_Re|
|00005810| 64 72 61 77 57 69 6e 64 | 6f 77 22 2c 2c 71 25 20 |drawWind|ow",,q% |
|00005820| b8 20 6d 6f 72 65 25 0d | 21 8e 16 20 20 f2 64 72 |. more%.|!.. .dr|
|00005830| 61 77 5f 74 78 74 28 6d | 6f 72 65 25 29 0d 21 98 |aw_txt(m|ore%).!.|
|00005840| 0b c9 6d 65 73 73 25 3a | 0d 21 a2 28 20 20 c8 99 |..mess%:|.!.( ..|
|00005850| 20 22 57 69 6d 70 5f 52 | 65 64 72 61 77 57 69 6e | "Wimp_R|edrawWin|
|00005860| 64 6f 77 22 2c 2c 71 25 | 20 b8 20 6d 6f 72 65 25 |dow",,q%| . more%|
|00005870| 0d 21 ac 16 20 20 f2 64 | 72 61 77 5f 6d 73 67 28 |.!.. .d|raw_msg(|
|00005880| 6d 6f 72 65 25 29 0d 21 | b6 06 7f 3a 0d 21 c0 22 |more%).!|...:.!."|
|00005890| 20 20 e3 74 77 25 3d 30 | b8 74 77 6d 61 78 25 3a | .tw%=0|.twmax%:|
|000058a0| e7 68 25 3d 74 77 77 25 | 28 74 77 25 29 8c 0d 21 |.h%=tww%|(tw%)..!|
|000058b0| ca 2a 20 20 20 20 c8 99 | 20 22 57 69 6d 70 5f 52 |.* ..| "Wimp_R|
|000058c0| 65 64 72 61 77 57 69 6e | 64 6f 77 22 2c 2c 71 25 |edrawWin|dow",,q%|
|000058d0| 20 b8 20 6d 6f 72 65 25 | 0d 21 d4 1b 20 20 20 20 | . more%|.!.. |
|000058e0| f2 64 72 61 77 5f 74 77 | 28 74 77 25 2c 6d 6f 72 |.draw_tw|(tw%,mor|
|000058f0| 65 25 29 0d 21 de 07 20 | 20 cd 0d 21 e8 07 20 20 |e%).!.. | ..!.. |
|00005900| ed 0d 21 f2 05 cb 0d 21 | fc 05 e1 0d 22 06 04 0d |..!....!|...."...|
|00005910| 22 10 0e dd f2 69 6e 69 | 74 5f 74 78 74 0d 22 1a |"....ini|t_txt.".|
|00005920| 0b 74 78 74 6f 25 3d 30 | 0d 22 24 3c 6c 6f 67 5f |.txto%=0|."$<log_|
|00005930| 79 25 3d 31 3a de 74 78 | 74 6c 24 28 74 78 74 79 |y%=1:.tx|tl$(txty|
|00005940| 25 29 2c 74 78 74 63 25 | 20 74 78 74 79 25 2c 6d |%),txtc%| txty%,m|
|00005950| 73 67 24 28 6d 73 67 6d | 61 78 25 29 3a 6d 73 67 |sg$(msgm|ax%):msg|
|00005960| 77 25 3d 30 0d 22 2e 22 | 74 78 74 6c 24 28 29 3d |w%=0."."|txtl$()=|
|00005970| c4 74 78 74 78 25 81 32 | 2c 22 20 22 29 3a 69 6f |.txtx%.2|," "):io|
|00005980| 66 66 25 3d 34 30 0d 22 | 38 3e 21 74 6d 70 25 3d |ff%=40."|8>!tmp%=|
|00005990| 30 3a 74 6d 70 25 21 34 | 3d 2d 74 78 74 79 25 2a |0:tmp%!4|=-txty%*|
|000059a0| 33 32 2d 69 6f 66 66 25 | 2d 38 3a 74 6d 70 25 21 |32-ioff%|-8:tmp%!|
|000059b0| 38 3d 74 78 74 78 25 2a | 31 36 3a 74 6d 70 25 21 |8=txtx%*|16:tmp%!|
|000059c0| 31 32 3d 30 0d 22 42 20 | c8 99 22 57 69 6d 70 5f |12=0."B |.."Wimp_|
|000059d0| 53 65 74 45 78 74 65 6e | 74 22 2c 74 78 74 25 2c |SetExten|t",txt%,|
|000059e0| 74 6d 70 25 0d 22 4c 3c | e3 69 25 3d 30 b8 31 3a |tmp%."L<|.i%=0.1:|
|000059f0| 21 74 6d 70 25 3d 74 78 | 74 25 3a 74 6d 70 25 21 |!tmp%=tx|t%:tmp%!|
|00005a00| 34 3d 69 25 3a c8 99 22 | 57 69 6d 70 5f 47 65 74 |4=i%:.."|Wimp_Get|
|00005a10| 49 63 6f 6e 53 74 61 74 | 65 22 2c 2c 74 6d 70 25 |IconStat|e",,tmp%|
|00005a20| 0d 22 56 41 74 6d 70 25 | 21 31 32 3d 74 6d 70 25 |."VAtmp%|!12=tmp%|
|00005a30| 21 31 32 2d 74 78 74 79 | 25 2a 33 32 3a 74 6d 70 |!12-txty|%*32:tmp|
|00005a40| 25 21 32 30 3d 74 6d 70 | 25 21 32 30 2d 74 78 74 |%!20=tmp|%!20-txt|
|00005a50| 79 25 2a 33 32 3a 74 6d | 70 25 21 34 3d 74 78 74 |y%*32:tm|p%!4=txt|
|00005a60| 25 0d 22 60 2c 21 71 25 | 3d 74 78 74 25 3a 71 25 |%."`,!q%|=txt%:q%|
|00005a70| 21 34 3d 69 25 3a c8 99 | 22 57 69 6d 70 5f 44 65 |!4=i%:..|"Wimp_De|
|00005a80| 6c 65 74 65 49 63 6f 6e | 22 2c 2c 71 25 0d 22 6a |leteIcon|",,q%."j|
|00005a90| 28 c8 99 22 57 69 6d 70 | 5f 43 72 65 61 74 65 49 |(.."Wimp|_CreateI|
|00005aa0| 63 6f 6e 22 2c 2c 74 6d | 70 25 2b 34 20 b8 69 6e |con",,tm|p%+4 .in|
|00005ab0| 69 63 25 3a ed 0d 22 74 | 23 70 74 72 25 3d 30 3a |ic%:.."t|#ptr%=0:|
|00005ac0| 6c 74 25 3d 30 3a 64 61 | 74 61 24 3d 22 22 3a 74 |lt%=0:da|ta$="":t|
|00005ad0| 64 61 74 61 24 3d 22 22 | 0d 22 7e 2a f2 70 72 69 |data$=""|."~*.pri|
|00005ae0| 6e 74 28 22 53 74 61 72 | 74 69 6e 67 20 53 4c 49 |nt("Star|ting SLI|
|00005af0| 50 64 69 61 6c 22 2c 22 | 49 64 6c 65 22 2c 22 20 |Pdial","|Idle"," |
|00005b00| 22 29 0d 22 88 2f e7 71 | 75 69 65 74 25 3d 30 80 |")."./.q|uiet%=0.|
|00005b10| a4 72 64 69 6e 76 28 63 | 6f 6e 66 69 67 25 2c 32 |.rdinv(c|onfig%,2|
|00005b20| 29 3d 30 20 8c f2 66 72 | 6f 6e 74 28 74 78 74 25 |)=0 ..fr|ont(txt%|
|00005b30| 29 0d 22 92 05 e1 0d 22 | 9c 04 0d 22 a6 1b dd f2 |)."...."|..."....|
|00005b40| 69 6e 69 74 5f 74 77 77 | 28 74 77 25 2c 6f 75 74 |init_tww|(tw%,out|
|00005b50| 25 2c 54 24 29 0d 22 b0 | 19 ea 6f 66 66 25 3a 6f |%,T$).".|..off%:o|
|00005b60| 66 66 25 3d 28 74 77 25 | 83 34 29 2a 34 30 0d 22 |ff%=(tw%|.4)*40."|
|00005b70| ba 11 e7 74 77 77 25 28 | 74 77 25 29 3d 30 8c 0d |...tww%(|tw%)=0..|
|00005b80| 22 c4 32 20 20 c8 99 20 | 22 57 69 6d 70 5f 4f 70 |".2 .. |"Wimp_Op|
|00005b90| 65 6e 54 65 6d 70 6c 61 | 74 65 22 2c 2c 73 64 6c |enTempla|te",,sdl|
|00005ba0| 61 6e 67 24 2b 22 2e 54 | 65 6d 70 6c 61 74 65 73 |ang$+".T|emplates|
|00005bb0| 22 0d 22 ce 43 20 20 c8 | 99 20 22 57 69 6d 70 5f |".".C .|. "Wimp_|
|00005bc0| 4c 6f 61 64 54 65 6d 70 | 6c 61 74 65 22 2c 2c 71 |LoadTemp|late",,q|
|00005bd0| 25 2c 69 6e 64 25 2c 73 | 70 25 2b 73 69 7a 65 25 |%,ind%,s|p%+size%|
|00005be0| 2c 2d 31 2c 22 74 61 73 | 6b 22 2c 30 20 b8 2c 2c |,-1,"tas|k",0 .,,|
|00005bf0| 69 6e 64 25 0d 22 d8 27 | 20 20 74 77 74 25 28 74 |ind%.".'| twt%(t|
|00005c00| 77 25 29 3d 71 25 21 37 | 32 3a 71 25 21 34 34 3d |w%)=q%!7|2:q%!44=|
|00005c10| 2d 74 77 77 6d 61 78 25 | 2a 33 32 0d 22 e2 41 20 |-twwmax%|*32.".A |
|00005c20| 20 21 71 25 3d 21 71 25 | 2b 6f 66 66 25 3a 71 25 | !q%=!q%|+off%:q%|
|00005c30| 21 38 3d 71 25 21 38 2b | 6f 66 66 25 3a 71 25 21 |!8=q%!8+|off%:q%!|
|00005c40| 34 3d 71 25 21 34 2d 6f | 66 66 25 3a 71 25 21 31 |4=q%!4-o|ff%:q%!1|
|00005c50| 32 3d 71 25 21 31 32 2d | 6f 66 66 25 0d 22 ec 2c |2=q%!12-|off%.".,|
|00005c60| 20 20 c8 99 20 22 57 69 | 6d 70 5f 43 72 65 61 74 | .. "Wi|mp_Creat|
|00005c70| 65 57 69 6e 64 6f 77 22 | 2c 2c 71 25 20 b8 20 74 |eWindow"|,,q% . t|
|00005c80| 77 77 25 28 74 77 25 29 | 0d 22 f6 1d 20 20 c8 99 |ww%(tw%)|.".. ..|
|00005c90| 20 22 57 69 6d 70 5f 43 | 6c 6f 73 65 54 65 6d 70 | "Wimp_C|loseTemp|
|00005ca0| 6c 61 74 65 22 0d 23 00 | 0c 20 20 c8 8e 74 77 25 |late".#.|. ..tw%|
|00005cb0| ca 0d 23 0a 1c 20 20 20 | 20 c9 30 3a de 74 77 62 |..#.. | .0:.twb|
|00005cc0| 75 66 30 24 28 74 77 77 | 6d 61 78 25 29 0d 23 14 |uf0$(tww|max%).#.|
|00005cd0| 1c 20 20 20 20 c9 31 3a | de 74 77 62 75 66 31 24 |. .1:|.twbuf1$|
|00005ce0| 28 74 77 77 6d 61 78 25 | 29 0d 23 1e 1c 20 20 20 |(twwmax%|).#.. |
|00005cf0| 20 c9 32 3a de 74 77 62 | 75 66 32 24 28 74 77 77 | .2:.twb|uf2$(tww|
|00005d00| 6d 61 78 25 29 0d 23 28 | 1c 20 20 20 20 c9 33 3a |max%).#(|. .3:|
|00005d10| de 74 77 62 75 66 33 24 | 28 74 77 77 6d 61 78 25 |.twbuf3$|(twwmax%|
|00005d20| 29 0d 23 32 1c 20 20 20 | 20 c9 34 3a de 74 77 62 |).#2. | .4:.twb|
|00005d30| 75 66 34 24 28 74 77 77 | 6d 61 78 25 29 0d 23 3c |uf4$(tww|max%).#<|
|00005d40| 1c 20 20 20 20 c9 35 3a | de 74 77 62 75 66 35 24 |. .5:|.twbuf5$|
|00005d50| 28 74 77 77 6d 61 78 25 | 29 0d 23 46 1c 20 20 20 |(twwmax%|).#F. |
|00005d60| 20 c9 36 3a de 74 77 62 | 75 66 36 24 28 74 77 77 | .6:.twb|uf6$(tww|
|00005d70| 6d 61 78 25 29 0d 23 50 | 22 20 20 20 20 7f 3a f2 |max%).#P|" .:.|
|00005d80| 68 61 6c 74 28 a4 6d 73 | 67 30 28 22 45 74 61 73 |halt(.ms|g0("Etas|
|00005d90| 6b 31 22 29 29 3a e1 0d | 23 5a 07 20 20 cb 0d 23 |k1")):..|#Z. ..#|
|00005da0| 64 07 20 20 cc 0d 23 6e | 0c 20 20 c8 8e 74 77 25 |d. ..#n|. ..tw%|
|00005db0| ca 0d 23 78 17 20 20 20 | 20 c9 30 3a 74 77 62 75 |..#x. | .0:twbu|
|00005dc0| 66 30 24 28 29 3d 22 22 | 0d 23 82 17 20 20 20 20 |f0$()=""|.#.. |
|00005dd0| c9 31 3a 74 77 62 75 66 | 31 24 28 29 3d 22 22 0d |.1:twbuf|1$()="".|
|00005de0| 23 8c 17 20 20 20 20 c9 | 32 3a 74 77 62 75 66 32 |#.. .|2:twbuf2|
|00005df0| 24 28 29 3d 22 22 0d 23 | 96 17 20 20 20 20 c9 33 |$()="".#|.. .3|
|00005e00| 3a 74 77 62 75 66 33 24 | 28 29 3d 22 22 0d 23 a0 |:twbuf3$|()="".#.|
|00005e10| 17 20 20 20 20 c9 34 3a | 74 77 62 75 66 34 24 28 |. .4:|twbuf4$(|
|00005e20| 29 3d 22 22 0d 23 aa 17 | 20 20 20 20 c9 35 3a 74 |)="".#..| .5:t|
|00005e30| 77 62 75 66 35 24 28 29 | 3d 22 22 0d 23 b4 17 20 |wbuf5$()|="".#.. |
|00005e40| 20 20 20 c9 36 3a 74 77 | 62 75 66 36 24 28 29 3d | .6:tw|buf6$()=|
|00005e50| 22 22 0d 23 be 07 20 20 | cb 0d 23 c8 05 cd 0d 23 |"".#.. |..#....#|
|00005e60| d2 49 24 74 77 74 25 28 | 74 77 25 29 3d a4 6d 73 |.I$twt%(|tw%)=.ms|
|00005e70| 67 31 28 22 54 61 73 6b | 52 75 6e 22 2c 54 24 29 |g1("Task|Run",T$)|
|00005e80| 3a 74 64 61 74 61 24 28 | 74 77 25 29 3d 22 22 3a |:tdata$(|tw%)="":|
|00005e90| 74 77 79 25 28 74 77 25 | 29 3d 30 3a 74 77 6f 25 |twy%(tw%|)=0:two%|
|00005ea0| 28 74 77 25 29 3d 30 0d | 23 dc 1b e7 6f 75 74 25 |(tw%)=0.|#...out%|
|00005eb0| 8c f2 66 72 6f 6e 74 28 | 74 77 77 25 28 74 77 25 |..front(|tww%(tw%|
|00005ec0| 29 29 0d 23 e6 05 e1 0d | 23 f0 04 0d 23 fa 25 dd |)).#....|#...#.%.|
|00005ed0| f2 75 70 64 61 74 65 5f | 74 78 74 28 75 78 30 25 |.update_|txt(ux0%|
|00005ee0| 2c 75 79 30 25 2c 75 78 | 31 25 2c 75 79 31 25 29 |,uy0%,ux|1%,uy1%)|
|00005ef0| 0d 24 04 36 21 71 25 3d | 74 78 74 25 3a 71 25 21 |.$.6!q%=|txt%:q%!|
|00005f00| 34 3d 75 78 30 25 3a 71 | 25 21 38 3d 75 79 30 25 |4=ux0%:q|%!8=uy0%|
|00005f10| 3a 71 25 21 31 32 3d 75 | 78 31 25 3a 71 25 21 31 |:q%!12=u|x1%:q%!1|
|00005f20| 36 3d 75 79 31 25 0d 24 | 0e 25 c8 99 22 57 69 6d |6=uy1%.$|.%.."Wim|
|00005f30| 70 5f 55 70 64 61 74 65 | 57 69 6e 64 6f 77 22 2c |p_Update|Window",|
|00005f40| 2c 71 25 20 b8 20 6d 6f | 72 65 25 0d 24 18 14 f2 |,q% . mo|re%.$...|
|00005f50| 64 72 61 77 5f 74 78 74 | 28 6d 6f 72 65 25 29 0d |draw_txt|(more%).|
|00005f60| 24 22 05 e1 0d 24 2c 04 | 0d 24 36 25 dd f2 75 70 |$"...$,.|.$6%..up|
|00005f70| 64 61 74 65 5f 6d 73 67 | 28 75 78 30 25 2c 75 79 |date_msg|(ux0%,uy|
|00005f80| 30 25 2c 75 78 31 25 2c | 75 79 31 25 29 0d 24 40 |0%,ux1%,|uy1%).$@|
|00005f90| 37 21 71 25 3d 6d 65 73 | 73 25 3a 71 25 21 34 3d |7!q%=mes|s%:q%!4=|
|00005fa0| 75 78 30 25 3a 71 25 21 | 38 3d 75 79 30 25 3a 71 |ux0%:q%!|8=uy0%:q|
|00005fb0| 25 21 31 32 3d 75 78 31 | 25 3a 71 25 21 31 36 3d |%!12=ux1|%:q%!16=|
|00005fc0| 75 79 31 25 0d 24 4a 25 | c8 99 22 57 69 6d 70 5f |uy1%.$J%|.."Wimp_|
|00005fd0| 55 70 64 61 74 65 57 69 | 6e 64 6f 77 22 2c 2c 71 |UpdateWi|ndow",,q|
|00005fe0| 25 20 b8 20 6d 6f 72 65 | 25 0d 24 54 14 f2 64 72 |% . more|%.$T..dr|
|00005ff0| 61 77 5f 6d 73 67 28 6d | 6f 72 65 25 29 0d 24 5e |aw_msg(m|ore%).$^|
|00006000| 05 e1 0d 24 68 04 0d 24 | 72 28 dd f2 75 70 64 61 |...$h..$|r(..upda|
|00006010| 74 65 5f 74 77 28 74 77 | 25 2c 75 78 30 25 2c 75 |te_tw(tw|%,ux0%,u|
|00006020| 79 30 25 2c 75 78 31 25 | 2c 75 79 31 25 29 0d 24 |y0%,ux1%|,uy1%).$|
|00006030| 7c 3b 21 71 25 3d 74 77 | 77 25 28 74 77 25 29 3a ||;!q%=tw|w%(tw%):|
|00006040| 71 25 21 34 3d 75 78 30 | 25 3a 71 25 21 38 3d 75 |q%!4=ux0|%:q%!8=u|
|00006050| 79 30 25 3a 71 25 21 31 | 32 3d 75 78 31 25 3a 71 |y0%:q%!1|2=ux1%:q|
|00006060| 25 21 31 36 3d 75 79 31 | 25 0d 24 86 25 c8 99 22 |%!16=uy1|%.$.%.."|
|00006070| 57 69 6d 70 5f 55 70 64 | 61 74 65 57 69 6e 64 6f |Wimp_Upd|ateWindo|
|00006080| 77 22 2c 2c 71 25 20 b8 | 20 6d 6f 72 65 25 0d 24 |w",,q% .| more%.$|
|00006090| 90 17 f2 64 72 61 77 5f | 74 77 28 74 77 25 2c 6d |...draw_|tw(tw%,m|
|000060a0| 6f 72 65 25 29 0d 24 9a | 05 e1 0d 24 a4 04 0d 24 |ore%).$.|...$...$|
|000060b0| ae 15 dd f2 64 72 61 77 | 5f 6d 73 67 28 6d 6f 72 |....draw|_msg(mor|
|000060c0| 65 25 29 0d 24 b8 0c c8 | 95 20 6d 6f 72 65 25 0d |e%).$...|. more%.|
|000060d0| 24 c2 13 20 20 f2 69 6e | 66 6f 28 71 25 2b 34 29 |$.. .in|fo(q%+4)|
|000060e0| 3a da 0d 24 cc 33 20 20 | 74 6f 70 25 3d 94 28 67 |:..$.3 |top%=.(g|
|000060f0| 79 31 25 2d 62 79 25 2b | 31 36 29 81 33 32 3a 62 |y1%-by%+|16).32:b|
|00006100| 6f 74 25 3d 94 28 67 79 | 30 25 2d 62 79 25 2b 31 |ot%=.(gy|0%-by%+1|
|00006110| 36 29 81 33 32 0d 24 d6 | 37 20 20 e7 62 6f 74 25 |6).32.$.|7 .bot%|
|00006120| 3e 6d 73 67 6d 61 78 25 | 20 8c 62 6f 74 25 3d 6d |>msgmax%| .bot%=m|
|00006130| 73 67 6d 61 78 25 3a e7 | 74 6f 70 25 3e 62 6f 74 |sgmax%:.|top%>bot|
|00006140| 25 20 8c 74 6f 70 25 3d | 62 6f 74 25 0d 24 e0 28 |% .top%=|bot%.$.(|
|00006150| 20 20 c8 99 22 57 69 6d | 70 5f 53 65 74 43 6f 6c | .."Wim|p_SetCol|
|00006160| 6f 75 72 22 2c 37 3a e3 | 4c 25 3d 74 6f 70 25 b8 |our",7:.|L%=top%.|
|00006170| 62 6f 74 25 0d 24 ea 35 | 20 20 ec 62 78 25 2b 34 |bot%.$.5| .bx%+4|
|00006180| 2d 6d 73 67 63 25 2a 28 | 6d 73 67 77 25 81 32 2d |-msgc%*(|msgw%.2-|
|00006190| a9 6d 73 67 24 28 4c 25 | 29 2a 38 29 2c 62 79 25 |.msg$(L%|)*8),by%|
|000061a0| 2d 4c 25 2a 33 32 2d 31 | 36 0d 24 f4 11 20 20 f1 |-L%*32-1|6.$.. .|
|000061b0| 6d 73 67 24 28 4c 25 29 | 3a ed 0d 24 fe 25 20 20 |msg$(L%)|:..$.% |
|000061c0| c8 99 22 57 69 6d 70 5f | 47 65 74 52 65 63 74 61 |.."Wimp_|GetRecta|
|000061d0| 6e 67 6c 65 22 2c 2c 71 | 25 b8 6d 6f 72 65 25 0d |ngle",,q|%.more%.|
|000061e0| 25 08 05 ce 0d 25 12 05 | e1 0d 25 1c 04 0d 25 26 |%....%..|..%...%&|
|000061f0| 18 dd f2 64 72 61 77 5f | 74 77 28 74 77 25 2c 6d |...draw_|tw(tw%,m|
|00006200| 6f 72 65 25 29 0d 25 30 | 1d ea 4c 25 2c 79 25 2c |ore%).%0|..L%,y%,|
|00006210| 74 6f 70 25 2c 62 6f 74 | 25 3a c8 95 20 6d 6f 72 |top%,bot|%:.. mor|
|00006220| 65 25 0d 25 3a 13 20 20 | f2 69 6e 66 6f 28 71 25 |e%.%:. |.info(q%|
|00006230| 2b 34 29 3a da 0d 25 44 | 2d 20 20 74 6f 70 25 3d |+4):..%D|- top%=|
|00006240| 94 28 67 79 31 25 2d 62 | 79 25 29 81 33 32 3a 62 |.(gy1%-b|y%).32:b|
|00006250| 6f 74 25 3d 94 28 67 79 | 30 25 2d 62 79 25 29 81 |ot%=.(gy|0%-by%).|
|00006260| 33 32 0d 25 4e 37 20 20 | e7 62 6f 74 25 3e 74 77 |32.%N7 |.bot%>tw|
|00006270| 77 6d 61 78 25 20 8c 62 | 6f 74 25 3d 74 77 77 6d |wmax% .b|ot%=twwm|
|00006280| 61 78 25 3a e7 74 6f 70 | 25 3e 62 6f 74 25 20 8c |ax%:.top|%>bot% .|
|00006290| 74 6f 70 25 3d 62 6f 74 | 25 0d 25 58 28 20 20 c8 |top%=bot|%.%X( .|
|000062a0| 99 22 57 69 6d 70 5f 53 | 65 74 43 6f 6c 6f 75 72 |."Wimp_S|etColour|
|000062b0| 22 2c 37 3a e3 4c 25 3d | 74 6f 70 25 b8 62 6f 74 |",7:.L%=|top%.bot|
|000062c0| 25 0d 25 62 1f 20 20 79 | 25 3d 28 4c 25 2b 74 77 |%.%b. y|%=(L%+tw|
|000062d0| 6f 25 28 74 77 25 29 29 | 83 74 77 77 6d 61 78 25 |o%(tw%))|.twwmax%|
|000062e0| 0d 25 6c 18 20 20 ec 62 | 78 25 2b 34 2c 62 79 25 |.%l. .b|x%+4,by%|
|000062f0| 2d 4c 25 2a 33 32 2d 34 | 0d 25 76 0c 20 20 c8 8e |-L%*32-4|.%v. ..|
|00006300| 74 77 25 ca 0d 25 80 17 | 20 20 20 20 c9 30 3a f1 |tw%..%..| .0:.|
|00006310| 74 77 62 75 66 30 24 28 | 79 25 29 0d 25 8a 17 20 |twbuf0$(|y%).%.. |
|00006320| 20 20 20 c9 31 3a f1 74 | 77 62 75 66 31 24 28 79 | .1:.t|wbuf1$(y|
|00006330| 25 29 0d 25 94 17 20 20 | 20 20 c9 32 3a f1 74 77 |%).%.. | .2:.tw|
|00006340| 62 75 66 32 24 28 79 25 | 29 0d 25 9e 17 20 20 20 |buf2$(y%|).%.. |
|00006350| 20 c9 33 3a f1 74 77 62 | 75 66 33 24 28 79 25 29 | .3:.twb|uf3$(y%)|
|00006360| 0d 25 a8 17 20 20 20 20 | c9 34 3a f1 74 77 62 75 |.%.. |.4:.twbu|
|00006370| 66 34 24 28 79 25 29 0d | 25 b2 17 20 20 20 20 c9 |f4$(y%).|%.. .|
|00006380| 35 3a f1 74 77 62 75 66 | 35 24 28 79 25 29 0d 25 |5:.twbuf|5$(y%).%|
|00006390| bc 17 20 20 20 20 c9 36 | 3a f1 74 77 62 75 66 36 |.. .6|:.twbuf6|
|000063a0| 24 28 79 25 29 0d 25 c6 | 07 20 20 cb 0d 25 d0 07 |$(y%).%.|. ..%..|
|000063b0| 20 20 ed 0d 25 da 25 20 | 20 c8 99 22 57 69 6d 70 | ..%.% | .."Wimp|
|000063c0| 5f 47 65 74 52 65 63 74 | 61 6e 67 6c 65 22 2c 2c |_GetRect|angle",,|
|000063d0| 71 25 b8 6d 6f 72 65 25 | 0d 25 e4 05 ce 0d 25 ee |q%.more%|.%....%.|
|000063e0| 05 e1 0d 25 f8 04 0d 26 | 02 15 dd f2 64 72 61 77 |...%...&|....draw|
|000063f0| 5f 74 78 74 28 6d 6f 72 | 65 25 29 0d 26 0c 1d ea |_txt(mor|e%).&...|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.
